home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1998-05-26 | 25.1 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 64 48 00 00 00 01 | 00 00 00 00 00 00 00 00 |..dH....|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000050| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000060| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000080| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000090| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000000f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000110| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000120| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000130| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000140| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000150| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000180| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000190| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000001f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000200| 00 00 00 01 00 00 00 10 | 56 45 52 53 49 4f 4e 20 |........|VERSION |
|00000210| 3d 20 20 20 33 2e 30 30 | 00 00 00 01 00 00 00 06 |= 3.00|........|
|00000220| 50 69 78 65 6c 73 00 00 | 00 01 00 00 00 08 63 6f |Pixels..|......co|
|00000230| 6d 62 6f 62 6f 78 00 00 | 00 01 00 00 00 0c 6c 6f |mbobox..|......lo|
|00000240| 6f 6b 75 70 5f 63 6f 6d | 62 6f 00 00 00 01 00 00 |okup_com|bo......|
|00000250| 00 01 31 00 00 00 01 00 | 00 00 64 46 6f 6e 74 4e |..1.....|..dFontN|
|00000260| 61 6d 65 20 3d 20 22 4d | 53 20 53 61 6e 73 20 53 |ame = "M|S Sans S|
|00000270| 65 72 69 66 22 0d 0a 46 | 6f 6e 74 53 69 7a 65 20 |erif"..F|ontSize |
|00000280| 3d 20 38 0d 0a 48 65 69 | 67 68 74 20 3d 20 32 33 |= 8..Hei|ght = 23|
|00000290| 0d 0a 57 69 64 74 68 20 | 3d 20 31 30 36 0d 0a 4e |..Width |= 106..N|
|000002a0| 61 6d 65 20 3d 20 22 64 | 69 73 74 69 6e 63 74 5f |ame = "d|istinct_|
|000002b0| 76 61 6c 75 65 73 5f 63 | 6f 6d 62 6f 22 0d 0a 00 |values_c|ombo"...|
|000002c0| 00 00 01 00 00 02 b3 50 | 52 4f 43 45 44 55 52 45 |.......P|ROCEDURE|
|000002d0| 20 44 65 73 74 72 6f 79 | 0d 0a 63 43 75 72 73 6f | Destroy|..cCurso|
|000002e0| 72 20 3d 20 22 63 22 20 | 2b 20 54 48 49 53 2e 6e |r = "c" |+ THIS.n|
|000002f0| 61 6d 65 0d 0a 49 46 20 | 55 53 45 44 28 63 43 75 |ame..IF |USED(cCu|
|00000300| 72 73 6f 72 29 20 54 48 | 45 4e 0d 0a 09 55 53 45 |rsor) TH|EN...USE|
|00000310| 20 49 4e 20 26 63 43 75 | 72 73 6f 72 0d 0a 45 4e | IN &cCu|rsor..EN|
|00000320| 44 49 46 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 50 52 |DIF..END|PROC..PR|
|00000330| 4f 43 45 44 55 52 45 20 | 49 6e 69 74 0d 0a 23 44 |OCEDURE |Init..#D|
|00000340| 45 46 49 4e 45 20 4e 4f | 5f 54 41 42 4c 45 5f 4c |EFINE NO|_TABLE_L|
|00000350| 4f 43 20 22 54 68 65 20 | 74 61 62 6c 65 20 61 6c |OC "The |table al|
|00000360| 69 61 73 20 6d 75 73 74 | 20 62 65 20 73 70 65 63 |ias must| be spec|
|00000370| 69 66 69 65 64 20 69 6e | 20 74 68 65 20 63 6f 6e |ified in| the con|
|00000380| 74 72 6f 6c 53 6f 75 72 | 63 65 20 70 72 6f 70 65 |trolSour|ce prope|
|00000390| 72 74 79 2c 20 69 6e 20 | 74 68 65 20 66 6f 72 6d |rty, in |the form|
|000003a0| 61 74 20 27 61 6c 69 61 | 73 2e 63 6f 6c 75 6d 6e |at 'alia|s.column|
|000003b0| 27 2e 22 0d 0a 0d 0a 49 | 46 20 21 45 4d 50 54 59 |'."....I|F !EMPTY|
|000003c0| 28 54 48 49 53 2e 63 6f | 6e 74 72 6f 6c 53 6f 75 |(THIS.co|ntrolSou|
|000003d0| 72 63 65 29 20 54 48 45 | 4e 0d 0a 09 49 46 20 4e |rce) THE|N...IF N|
|000003e0| 4f 54 20 22 2e 22 20 24 | 20 54 48 49 53 2e 63 6f |OT "." $| THIS.co|
|000003f0| 6e 74 72 6f 6c 53 6f 75 | 72 63 65 20 54 48 45 4e |ntrolSou|rce THEN|
|00000400| 0d 0a 09 09 3d 4d 45 53 | 53 41 47 45 42 4f 58 28 |....=MES|SAGEBOX(|
|00000410| 4e 4f 5f 54 41 42 4c 45 | 5f 4c 4f 43 29 0d 0a 09 |NO_TABLE|_LOC)...|
|00000420| 45 4c 53 45 0d 0a 09 09 | 63 41 6c 69 61 73 20 3d |ELSE....|cAlias =|
|00000430| 20 4c 45 46 54 43 28 54 | 48 49 53 2e 63 6f 6e 74 | LEFTC(T|HIS.cont|
|00000440| 72 6f 6c 53 6f 75 72 63 | 65 2c 28 41 54 43 28 22 |rolSourc|e,(ATC("|
|00000450| 2e 22 2c 54 48 49 53 2e | 63 6f 6e 74 72 6f 6c 53 |.",THIS.|controlS|
|00000460| 6f 75 72 63 65 29 2d 31 | 29 29 0d 0a 09 09 63 43 |ource)-1|))....cC|
|00000470| 6f 6c 75 6d 6e 20 3d 20 | 52 49 47 48 54 43 28 54 |olumn = |RIGHTC(T|
|00000480| 48 49 53 2e 63 6f 6e 74 | 72 6f 6c 53 6f 75 72 63 |HIS.cont|rolSourc|
|00000490| 65 2c 28 4c 45 4e 43 28 | 54 48 49 53 2e 63 6f 6e |e,(LENC(|THIS.con|
|000004a0| 74 72 6f 6c 53 6f 75 72 | 63 65 29 2d 41 54 43 28 |trolSour|ce)-ATC(|
|000004b0| 22 2e 22 2c 54 48 49 53 | 2e 63 6f 6e 74 72 6f 6c |".",THIS|.control|
|000004c0| 53 6f 75 72 63 65 29 29 | 29 0d 0a 09 09 54 48 49 |Source))|)....THI|
|000004d0| 53 2e 72 6f 77 53 6f 75 | 72 63 65 54 79 70 65 20 |S.rowSou|rceType |
|000004e0| 3d 20 33 0d 0a 09 09 63 | 53 51 4c 20 3d 20 22 53 |= 3....c|SQL = "S|
|000004f0| 45 4c 45 43 54 20 44 49 | 53 54 49 4e 43 54 20 22 |ELECT DI|STINCT "|
|00000500| 20 2b 20 63 43 6f 6c 75 | 6d 6e 20 2b 20 22 20 46 | + cColu|mn + " F|
|00000510| 52 4f 4d 20 22 20 2b 20 | 63 41 6c 69 61 73 20 2b |ROM " + |cAlias +|
|00000520| 20 3b 0d 0a 09 09 20 20 | 22 20 49 4e 54 4f 20 43 | ;.... |" INTO C|
|00000530| 55 52 53 4f 52 20 63 22 | 20 2b 20 54 48 49 53 2e |URSOR c"| + THIS.|
|00000540| 6e 61 6d 65 0d 0a 09 09 | 54 48 49 53 2e 72 6f 77 |name....|THIS.row|
|00000550| 53 6f 75 72 63 65 20 3d | 20 63 53 51 4c 0d 0a 09 |Source =| cSQL...|
|00000560| 45 4e 44 49 46 0d 0a 45 | 4e 44 49 46 0d 0a 09 0d |ENDIF..E|NDIF....|
|00000570| 0a 45 4e 44 50 52 4f 43 | 0d 0a 00 00 00 01 00 00 |.ENDPROC|........|
|00000580| 00 21 41 72 69 61 6c 2c | 20 30 2c 20 39 2c 20 35 |.!Arial,| 0, 9, 5|
|00000590| 2c 20 31 35 2c 20 31 32 | 2c 20 32 31 2c 20 33 2c |, 15, 12|, 21, 3,|
|000005a0| 20 30 0a 00 00 00 01 00 | 00 00 03 76 63 72 00 00 | 0......|...vcr..|
|000005b0| 00 01 00 00 00 06 50 69 | 78 65 6c 73 00 00 00 01 |......Pi|xels....|
|000005c0| 00 00 00 05 43 6c 61 73 | 73 00 00 00 01 00 00 00 |....Clas|s.......|
|000005d0| 01 37 00 00 00 01 00 00 | 00 07 63 6f 6e 74 72 6f |.7......|..contro|
|000005e0| 6c 00 00 00 01 00 00 00 | 03 76 63 72 00 00 00 01 |l.......|.vcr....|
|000005f0| 00 00 01 b0 fe f2 ff 20 | 02 01 00 00 00 97 01 00 |....... |........|
|00000600| 00 97 01 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000610| 00 00 00 00 00 00 00 00 | 00 00 00 6e 47 01 00 00 |........|...nG...|
|00000620| 00 25 00 00 00 21 01 00 | 00 00 00 00 00 4e 01 00 |.%...!..|.....N..|
|00000630| 00 0f 00 00 00 30 01 00 | 00 00 00 00 00 00 00 00 |.....0..|........|
|00000640| 00 fc 03 00 03 00 55 00 | 00 bd 00 16 00 25 fc 43 |......U.|.....%.C|
|00000650| f4 00 00 f4 01 00 f7 02 | 00 a1 0a fd f9 05 26 00 |........|......&.|
|00000660| fe 10 00 46 fc f4 00 00 | f4 01 00 f7 02 00 03 fd |...F....|........|
|00000670| fe 04 00 1e fe 43 00 25 | fc 43 d9 2c 00 41 72 65 |.....C.%|.C.,.Are|
|00000680| 20 79 6f 75 20 73 75 72 | 65 20 79 6f 75 20 77 61 | you sur|e you wa|
|00000690| 6e 74 20 74 6f 20 64 65 | 6c 65 74 65 20 74 68 69 |nt to de|lete thi|
|000006a0| 73 20 72 65 63 6f 72 64 | 3f f8 02 24 ea 78 f8 01 |s record|?..$.x..|
|000006b0| 06 10 fd f9 05 b6 00 fe | 04 00 14 fe 0d 00 25 fc |........|......%.|
|000006c0| 43 2b 0a fd f9 05 87 00 | fe 09 00 48 fc f8 01 01 |C+......|...H....|
|000006d0| fd fe 04 00 1e fe 13 00 | 25 fc 43 2b f0 04 00 43 |........|%.C+...C|
|000006e0| 1e 0a 09 fd f9 05 a8 00 | fe 0a 00 48 fc f9 02 ff |........|...H....|
|000006f0| ff fd fe 04 00 1e fe 0a | 00 99 f4 03 00 f7 04 00 |........|........|
|00000700| fe 04 00 1e fe 03 00 55 | 05 00 04 00 54 48 49 53 |.......U|....THIS|
|00000710| 06 00 50 41 52 45 4e 54 | 11 00 43 4e 41 56 49 47 |..PARENT|..CNAVIG|
|00000720| 41 54 49 4f 4e 5f 54 41 | 42 4c 45 08 00 54 48 49 |ATION_TA|BLE..THI|
|00000730| 53 46 4f 52 4d 07 00 52 | 45 46 52 45 53 48 05 00 |SFORM..R|EFRESH..|
|00000740| 43 6c 69 63 6b 2c 00 00 | 00 00 00 ff ff 31 00 66 |Click,..|.....1.f|
|00000750| 01 01 01 41 00 31 04 41 | 00 d1 00 91 00 41 00 31 |...A.1.A|.....A.1|
|00000760| 01 a1 00 41 00 a1 00 41 | 00 31 00 00 00 00 00 00 |...A...A|.1......|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 01 00 00 00 11 |........|........|
|00000780| 00 00 00 83 01 00 00 01 | 00 00 00 00 29 00 00 00 |........|....)...|
|00000790| 97 01 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000007a0| 00 00 00 00 00 00 00 01 | 00 00 00 96 41 75 74 6f |........|....Auto|
|000007b0| 53 69 7a 65 20 3d 20 2e | 46 2e 0d 0a 54 6f 70 20 |Size = .|F...Top |
|000007c0| 3d 20 31 0d 0a 4c 65 66 | 74 20 3d 20 32 38 30 0d |= 1..Lef|t = 280.|
|000007d0| 0a 48 65 69 67 68 74 20 | 3d 20 32 37 0d 0a 57 69 |.Height |= 27..Wi|
|000007e0| 64 74 68 20 3d 20 35 34 | 0d 0a 50 69 63 74 75 72 |dth = 54|..Pictur|
|000007f0| 65 20 3d 20 2e 2e 5c 2e | 2e 5c 2e 2e 5c 2e 2e 5c |e = ..\.|.\..\..\|
|00000800| 2e 2e 5c 2e 2e 5c 74 65 | 73 74 69 6e 67 5c 0d 0a |..\..\te|sting\..|
|00000810| 43 61 70 74 69 6f 6e 20 | 3d 20 22 5c 3c 44 65 6c |Caption |= "\<Del|
|00000820| 65 74 65 22 0d 0a 4e 61 | 6d 65 20 3d 20 22 56 66 |ete"..Na|me = "Vf|
|00000830| 70 63 6f 6d 6d 61 6e 64 | 62 75 74 74 6f 6e 32 22 |pcommand|button2"|
|00000840| 0d 0a 00 00 00 01 00 00 | 00 03 76 63 72 00 00 00 |........|..vcr...|
|00000850| 01 00 00 00 0d 63 6f 6d | 6d 61 6e 64 62 75 74 74 |.....com|mandbutt|
|00000860| 6f 6e 00 00 00 01 00 00 | 00 15 64 69 73 74 69 6e |on......|..distin|
|00000870| 63 74 5f 76 61 6c 75 65 | 73 5f 63 6f 6d 62 6f 00 |ct_value|s_combo.|
|00000880| 00 00 01 00 00 00 08 63 | 6f 6d 62 6f 62 6f 78 00 |.......c|ombobox.|
|00000890| 00 00 01 00 00 00 01 31 | 00 00 00 01 00 00 00 05 |.......1|........|
|000008a0| 43 6c 61 73 73 00 00 00 | 01 00 00 00 06 50 69 78 |Class...|.....Pix|
|000008b0| 65 6c 73 00 00 00 01 00 | 00 00 15 64 69 73 74 69 |els.....|...disti|
|000008c0| 6e 63 74 5f 76 61 6c 75 | 65 73 5f 63 6f 6d 62 6f |nct_valu|es_combo|
|000008d0| 00 00 00 01 00 00 00 29 | 4d 53 20 53 61 6e 73 20 |.......)|MS Sans |
|000008e0| 53 65 72 69 66 2c 20 30 | 2c 20 38 2c 20 35 2c 20 |Serif, 0|, 8, 5, |
|000008f0| 31 33 2c 20 31 31 2c 20 | 31 31 2c 20 32 2c 20 30 |13, 11, |11, 2, 0|
|00000900| 0a 00 00 00 01 00 00 00 | 29 4d 53 20 53 61 6e 73 |........|)MS Sans|
|00000910| 20 53 65 72 69 66 2c 20 | 30 2c 20 38 2c 20 35 2c | Serif, |0, 8, 5,|
|00000920| 20 31 33 2c 20 31 31 2c | 20 31 31 2c 20 32 2c 20 | 13, 11,| 11, 2, |
|00000930| 30 0a 00 00 00 01 00 00 | 00 05 43 6c 61 73 73 00 |0.......|..Class.|
|00000940| 00 00 01 00 00 00 08 63 | 6f 6d 62 6f 62 6f 78 00 |.......c|ombobox.|
|00000950| 00 00 01 00 00 00 0c 6c | 6f 6f 6b 75 70 5f 63 6f |.......l|ookup_co|
|00000960| 6d 62 6f 00 00 00 01 00 | 00 01 6a 64 69 73 70 6c |mbo.....|..jdispl|
|00000970| 61 79 5f 63 6f 6c 75 6d | 6e 20 53 70 65 63 69 66 |ay_colum|n Specif|
|00000980| 69 65 73 20 74 68 65 20 | 63 6f 6c 75 6d 6e 20 66 |ies the |column f|
|00000990| 72 6f 6d 20 6c 6f 6f 6b | 75 70 5f 74 61 62 6c 65 |rom look|up_table|
|000009a0| 20 74 6f 20 64 69 73 70 | 6c 61 79 20 69 6e 20 74 | to disp|lay in t|
|000009b0| 68 65 20 64 72 6f 70 20 | 64 6f 77 6e 20 6c 69 73 |he drop |down lis|
|000009c0| 74 2e 0d 0a 6c 6f 6f 6b | 75 70 5f 74 61 62 6c 65 |t...look|up_table|
|000009d0| 20 53 70 65 63 69 66 69 | 65 73 20 74 68 65 20 74 | Specifi|es the t|
|000009e0| 61 62 6c 65 20 74 6f 20 | 6c 6f 6f 6b 75 70 20 74 |able to |lookup t|
|000009f0| 68 65 20 76 61 6c 75 65 | 73 20 74 6f 20 64 69 73 |he value|s to dis|
|00000a00| 70 6c 61 79 20 69 6e 20 | 74 68 65 20 64 72 6f 70 |play in |the drop|
|00000a10| 20 64 6f 77 6e 2e 0d 0a | 72 65 74 75 72 6e 5f 63 | down...|return_c|
|00000a20| 6f 6c 75 6d 6e 20 53 70 | 65 63 69 66 69 65 73 20 |olumn Sp|ecifies |
|00000a30| 74 68 65 20 63 6f 6c 75 | 6d 6e 20 76 61 6c 75 65 |the colu|mn value|
|00000a40| 20 74 6f 20 72 65 74 75 | 72 6e 20 74 68 65 20 76 | to retu|rn the v|
|00000a50| 61 6c 75 65 20 70 72 6f | 70 65 72 74 79 20 6f 66 |alue pro|perty of|
|00000a60| 20 74 68 65 20 63 6f 6d | 62 6f 20 62 6f 78 2e 0d | the com|bo box..|
|00000a70| 0a 6f 72 64 65 72 5f 63 | 6f 6c 75 6d 6e 20 53 70 |.order_c|olumn Sp|
|00000a80| 65 63 69 66 69 65 73 20 | 74 68 65 20 63 6f 6c 75 |ecifies |the colu|
|00000a90| 6d 6e 20 74 6f 20 6f 72 | 64 65 72 20 74 68 65 20 |mn to or|der the |
|00000aa0| 72 65 63 6f 72 64 73 20 | 64 69 73 70 6c 61 79 65 |records |displaye|
|00000ab0| 64 20 69 6e 20 74 68 65 | 20 64 72 6f 70 20 64 6f |d in the| drop do|
|00000ac0| 77 6e 20 6c 69 73 74 20 | 28 6f 70 74 69 6f 6e 61 |wn list |(optiona|
|00000ad0| 6c 29 2e 0d 0a 00 00 00 | 01 00 00 01 8e 50 52 4f |l)......|.....PRO|
|00000ae0| 43 45 44 55 52 45 20 43 | 6c 69 63 6b 0d 0a 0d 0a |CEDURE C|lick....|
|00000af0| 23 44 45 46 49 4e 45 20 | 4d 53 47 42 4f 58 5f 59 |#DEFINE |MSGBOX_Y|
|00000b00| 45 53 09 09 36 0d 0a 23 | 44 45 46 49 4e 45 20 43 |ES..6..#|DEFINE C|
|00000b10| 5f 4d 53 47 42 4f 58 31 | 09 09 33 36 0d 0a 23 44 |_MSGBOX1|..36..#D|
|00000b20| 45 46 49 4e 45 20 43 5f | 44 45 4c 45 54 45 5f 4c |EFINE C_|DELETE_L|
|00000b30| 4f 43 09 22 41 72 65 20 | 79 6f 75 20 73 75 72 65 |OC."Are |you sure|
|00000b40| 20 79 6f 75 20 77 61 6e | 74 20 74 6f 20 64 65 6c | you wan|t to del|
|00000b50| 65 74 65 20 74 68 69 73 | 20 72 65 63 6f 72 64 3f |ete this| record?|
|00000b60| 22 0d 0a 0d 0a 49 46 20 | 21 45 4d 50 54 59 28 54 |"....IF |!EMPTY(T|
|00000b70| 48 49 53 2e 70 61 72 65 | 6e 74 2e 63 4e 61 76 69 |HIS.pare|nt.cNavi|
|00000b80| 67 61 74 69 6f 6e 5f 74 | 61 62 6c 65 29 20 54 48 |gation_t|able) TH|
|00000b90| 45 4e 0d 0a 09 53 45 4c | 45 43 54 20 28 54 48 49 |EN...SEL|ECT (THI|
|00000ba0| 53 2e 70 61 72 65 6e 74 | 2e 63 4e 61 76 69 67 61 |S.parent|.cNaviga|
|00000bb0| 74 69 6f 6e 5f 74 61 62 | 6c 65 29 0d 0a 45 4e 44 |tion_tab|le)..END|
|00000bc0| 49 46 0d 0a 49 46 20 4d | 45 53 53 41 47 45 42 4f |IF..IF M|ESSAGEBO|
|00000bd0| 58 28 43 5f 44 45 4c 45 | 54 45 5f 4c 4f 43 2c 43 |X(C_DELE|TE_LOC,C|
|00000be0| 5f 4d 53 47 42 4f 58 31 | 29 20 3d 20 4d 53 47 42 |_MSGBOX1|) = MSGB|
|00000bf0| 4f 58 5f 59 45 53 0d 0a | 09 44 45 4c 45 54 45 0d |OX_YES..|.DELETE.|
|00000c00| 0a 09 49 46 20 21 45 4f | 46 28 29 0d 0a 09 09 53 |..IF !EO|F()....S|
|00000c10| 4b 49 50 20 31 0d 0a 09 | 45 4e 44 49 46 0d 0a 09 |KIP 1...|ENDIF...|
|00000c20| 49 46 20 45 4f 46 28 29 | 20 41 4e 44 20 21 42 4f |IF EOF()| AND !BO|
|00000c30| 46 28 29 0d 0a 09 09 53 | 4b 49 50 20 2d 31 0d 0a |F()....S|KIP -1..|
|00000c40| 09 45 4e 44 49 46 0d 0a | 09 54 48 49 53 46 4f 52 |.ENDIF..|.THISFOR|
|00000c50| 4d 2e 52 65 66 72 65 73 | 68 0d 0a 45 4e 44 49 46 |M.Refres|h..ENDIF|
|00000c60| 0d 0a 45 4e 44 50 52 4f | 43 0d 0a 00 00 00 01 00 |..ENDPRO|C.......|
|00000c70| 00 00 11 56 66 70 63 6f | 6d 6d 61 6e 64 62 75 74 |...Vfpco|mmandbut|
|00000c80| 74 6f 6e 32 00 00 00 01 | 00 00 00 0d 63 6f 6d 6d |ton2....|....comm|
|00000c90| 61 6e 64 62 75 74 74 6f | 6e 00 00 00 01 00 00 01 |andbutto|n.......|
|00000ca0| 1f fe f2 ff 20 02 01 00 | 00 00 06 01 00 00 06 01 |.... ...|........|
|00000cb0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000cc0| 00 00 00 00 00 00 00 00 | 01 27 01 00 00 00 25 00 |........|.'....%.|
|00000cd0| 00 00 a0 00 00 00 00 00 | 00 00 bd 00 00 00 07 00 |........|........|
|00000ce0| 00 00 af 00 00 00 00 00 | 00 00 00 00 00 00 fc 03 |........|........|
|00000cf0| 00 03 00 55 00 00 3c 00 | 16 00 25 fc 43 f4 00 00 |...U..<.|..%.C...|
|00000d00| f4 01 00 f7 02 00 a1 0a | fd f9 05 26 00 fe 10 00 |........|...&....|
|00000d10| 46 fc f4 00 00 f4 01 00 | f7 02 00 03 fd fe 04 00 |F.......|........|
|00000d20| 1e fe 05 00 06 08 fe 0a | 00 99 f4 03 00 f7 04 00 |........|........|
|00000d30| fe 03 00 55 05 00 04 00 | 54 48 49 53 06 00 50 41 |...U....|THIS..PA|
|00000d40| 52 45 4e 54 11 00 43 4e | 41 56 49 47 41 54 49 4f |RENT..CN|AVIGATIO|
|00000d50| 4e 5f 54 41 42 4c 45 08 | 00 54 48 49 53 46 4f 52 |N_TABLE.|.THISFOR|
|00000d60| 4d 07 00 52 45 46 52 45 | 53 48 05 00 43 6c 69 63 |M..REFRE|SH..Clic|
|00000d70| 6b 2c 00 00 00 00 00 ff | ff 31 00 61 01 01 01 41 |k,......|.1.a...A|
|00000d80| 00 52 00 a2 00 31 00 00 | 00 00 00 00 00 00 00 00 |.R...1..|........|
|00000d90| 00 00 00 00 00 00 00 01 | 00 00 00 11 00 00 00 92 |........|........|
|00000da0| 00 00 00 01 00 00 00 00 | 29 00 00 00 06 01 00 00 |........|).......|
|00000db0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000dc0| 00 00 00 01 00 00 00 9d | 50 52 4f 43 45 44 55 52 |........|PROCEDUR|
|00000dd0| 45 20 43 6c 69 63 6b 0d | 0a 49 46 20 21 45 4d 50 |E Click.|.IF !EMP|
|00000de0| 54 59 28 54 48 49 53 2e | 70 61 72 65 6e 74 2e 63 |TY(THIS.|parent.c|
|00000df0| 4e 61 76 69 67 61 74 69 | 6f 6e 5f 74 61 62 6c 65 |Navigati|on_table|
|00000e00| 29 20 54 48 45 4e 0d 0a | 09 53 45 4c 45 43 54 20 |) THEN..|.SELECT |
|00000e10| 28 54 48 49 53 2e 70 61 | 72 65 6e 74 2e 63 4e 61 |(THIS.pa|rent.cNa|
|00000e20| 76 69 67 61 74 69 6f 6e | 5f 74 61 62 6c 65 29 0d |vigation|_table).|
|00000e30| 0a 45 4e 44 49 46 0d 0a | 0d 0a 41 50 50 45 4e 44 |.ENDIF..|..APPEND|
|00000e40| 20 42 4c 41 4e 4b 0d 0a | 0d 0a 54 48 49 53 46 4f | BLANK..|..THISFO|
|00000e50| 52 4d 2e 52 65 66 72 65 | 73 68 0d 0a 45 4e 44 50 |RM.Refre|sh..ENDP|
|00000e60| 52 4f 43 0d 0a 00 00 00 | 01 00 00 00 c1 41 75 74 |ROC.....|.....Aut|
|00000e70| 6f 53 69 7a 65 20 3d 20 | 2e 46 2e 0d 0a 54 6f 70 |oSize = |.F...Top|
|00000e80| 20 3d 20 31 0d 0a 4c 65 | 66 74 20 3d 20 32 32 39 | = 1..Le|ft = 229|
|00000e90| 0d 0a 48 65 69 67 68 74 | 20 3d 20 32 37 0d 0a 57 |..Height| = 27..W|
|00000ea0| 69 64 74 68 20 3d 20 33 | 39 0d 0a 50 69 63 74 75 |idth = 3|9..Pictu|
|00000eb0| 72 65 20 3d 20 2e 2e 5c | 2e 2e 5c 2e 2e 5c 2e 2e |re = ..\|..\..\..|
|00000ec0| 5c 2e 2e 5c 2e 2e 5c 74 | 65 73 74 69 6e 67 5c 0d |\..\..\t|esting\.|
|00000ed0| 0a 44 69 73 61 62 6c 65 | 64 50 69 63 74 75 72 65 |.Disable|dPicture|
|00000ee0| 20 3d 20 2e 2e 5c 2e 2e | 5c 2e 2e 5c 2e 2e 5c 2e | = ..\..|\..\..\.|
|00000ef0| 2e 5c 2e 2e 5c 74 65 73 | 74 69 6e 67 5c 0d 0a 43 |.\..\tes|ting\..C|
|00000f00| 61 70 74 69 6f 6e 20 3d | 20 22 5c 3c 41 64 64 22 |aption =| "\<Add"|
|00000f10| 0d 0a 4e 61 6d 65 20 3d | 20 22 56 66 70 63 6f 6d |..Name =| "Vfpcom|
|00000f20| 6d 61 6e 64 62 75 74 74 | 6f 6e 31 22 0d 0a 00 00 |mandbutt|on1"....|
|00000f30| 00 01 00 00 00 03 76 63 | 72 00 00 00 01 00 00 00 |......vc|r.......|
|00000f40| 11 56 66 70 63 6f 6d 6d | 61 6e 64 62 75 74 74 6f |.Vfpcomm|andbutto|
|00000f50| 6e 31 00 00 00 01 00 00 | 00 0d 63 6f 6d 6d 61 6e |n1......|..comman|
|00000f60| 64 62 75 74 74 6f 6e 00 | 00 00 01 00 00 00 0d 63 |dbutton.|.......c|
|00000f70| 6f 6d 6d 61 6e 64 62 75 | 74 74 6f 6e 00 00 00 01 |ommandbu|tton....|
|00000f80| 00 00 00 bc 41 75 74 6f | 53 69 7a 65 20 3d 20 2e |....Auto|Size = .|
|00000f90| 46 2e 0d 0a 54 6f 70 20 | 3d 20 31 0d 0a 4c 65 66 |F...Top |= 1..Lef|
|00000fa0| 74 20 3d 20 31 36 30 0d | 0a 48 65 69 67 68 74 20 |t = 160.|.Height |
|00000fb0| 3d 20 32 37 0d 0a 57 69 | 64 74 68 20 3d 20 35 37 |= 27..Wi|dth = 57|
|00000fc0| 0d 0a 50 69 63 74 75 72 | 65 20 3d 20 2e 2e 5c 2e |..Pictur|e = ..\.|
|00000fd0| 2e 5c 2e 2e 5c 2e 2e 5c | 2e 2e 5c 2e 2e 5c 74 65 |.\..\..\|..\..\te|
|00000fe0| 73 74 69 6e 67 5c 0d 0a | 44 69 73 61 62 6c 65 64 |sting\..|Disabled|
|00000ff0| 50 69 63 74 75 72 65 20 | 3d 20 2e 2e 5c 2e 2e 5c |Picture |= ..\..\|
|00001000| 2e 2e 5c 2e 2e 5c 2e 2e | 5c 2e 2e 5c 74 65 73 74 |..\..\..|\..\test|
|00001010| 69 6e 67 5c 0d 0a 43 61 | 70 74 69 6f 6e 20 3d 20 |ing\..Ca|ption = |
|00001020| 22 5c 3c 42 6f 74 74 6f | 6d 22 0d 0a 4e 61 6d 65 |"\<Botto|m"..Name|
|00001030| 20 3d 20 22 63 6d 64 42 | 6f 74 74 6f 6d 22 0d 0a | = "cmdB|ottom"..|
|00001040| 00 00 00 01 00 00 00 0b | 64 61 74 61 63 68 65 63 |........|datachec|
|00001050| 6b 65 72 00 00 00 01 00 | 00 00 0b 64 61 74 61 63 |ker.....|...datac|
|00001060| 68 65 63 6b 65 72 00 00 | 00 01 00 00 00 03 76 63 |hecker..|......vc|
|00001070| 72 00 00 00 01 00 00 00 | 09 63 6d 64 42 6f 74 74 |r.......|.cmdBott|
|00001080| 6f 6d 00 00 00 01 00 00 | 00 0d 63 6f 6d 6d 61 6e |om......|..comman|
|00001090| 64 62 75 74 74 6f 6e 00 | 00 00 01 00 00 00 0d 63 |dbutton.|.......c|
|000010a0| 6f 6d 6d 61 6e 64 62 75 | 74 74 6f 6e 00 00 00 01 |ommandbu|tton....|
|000010b0| 00 00 00 03 76 63 72 00 | 00 00 01 00 00 00 07 63 |....vcr.|.......c|
|000010c0| 6d 64 4e 65 78 74 00 00 | 00 01 00 00 00 0d 63 6f |mdNext..|......co|
|000010d0| 6d 6d 61 6e 64 62 75 74 | 74 6f 6e 00 00 00 01 00 |mmandbut|ton.....|
|000010e0| 00 00 0d 63 6f 6d 6d 61 | 6e 64 62 75 74 74 6f 6e |...comma|ndbutton|
|000010f0| 00 00 00 01 00 00 00 03 | 76 63 72 00 00 00 01 00 |........|vcr.....|
|00001100| 00 00 0b 63 6d 64 50 72 | 65 76 69 6f 75 73 00 00 |...cmdPr|evious..|
|00001110| 00 01 00 00 00 0d 63 6f | 6d 6d 61 6e 64 62 75 74 |......co|mmandbut|
|00001120| 74 6f 6e 00 00 00 01 00 | 00 00 0d 63 6f 6d 6d 61 |ton.....|...comma|
|00001130| 6e 64 62 75 74 74 6f 6e | 00 00 00 01 00 00 00 01 |ndbutton|........|
|00001140| 31 00 00 00 01 00 00 00 | 2f 48 65 69 67 68 74 20 |1.......|/Height |
|00001150| 3d 20 31 35 0d 0a 57 69 | 64 74 68 20 3d 20 32 33 |= 15..Wi|dth = 23|
|00001160| 0d 0a 4e 61 6d 65 20 3d | 20 22 64 61 74 61 63 68 |..Name =| "datach|
|00001170| 65 63 6b 65 72 22 0d 0a | 00 00 00 01 00 00 00 03 |ecker"..|........|
|00001180| 76 63 72 00 00 00 01 00 | 00 00 06 63 6d 64 54 6f |vcr.....|...cmdTo|
|00001190| 70 00 00 00 01 00 00 00 | 0d 63 6f 6d 6d 61 6e 64 |p.......|.command|
|000011a0| 62 75 74 74 6f 6e 00 00 | 00 01 00 00 00 06 50 69 |button..|......Pi|
|000011b0| 78 65 6c 73 00 00 00 01 | 00 00 00 0d 63 6f 6d 6d |xels....|....comm|
|000011c0| 61 6e 64 62 75 74 74 6f | 6e 00 00 00 01 00 00 07 |andbutto|n.......|
|000011d0| ce 50 52 4f 43 45 44 55 | 52 45 20 44 65 73 74 72 |.PROCEDU|RE Destr|
|000011e0| 6f 79 0d 0a 63 41 6c 69 | 61 73 20 3d 20 54 48 49 |oy..cAli|as = THI|
|000011f0| 53 2e 6e 61 6d 65 0d 0a | 49 46 20 55 53 45 44 28 |S.name..|IF USED(|
|00001200| 63 41 6c 69 61 73 29 20 | 54 48 45 4e 0d 0a 09 55 |cAlias) |THEN...U|
|00001210| 53 45 20 49 4e 20 26 63 | 41 6c 69 61 73 0d 0a 45 |SE IN &c|Alias..E|
|00001220| 4e 44 49 46 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 50 |NDIF..EN|DPROC..P|
|00001230| 52 4f 43 45 44 55 52 45 | 20 45 72 72 6f 72 0d 0a |ROCEDURE| Error..|
|00001240| 4c 50 41 52 41 4d 45 54 | 45 52 53 20 6e 45 72 72 |LPARAMET|ERS nErr|
|00001250| 6f 72 2c 20 63 4d 65 74 | 68 6f 64 2c 20 6e 4c 69 |or, cMet|hod, nLi|
|00001260| 6e 65 0d 0a 0d 0a 23 44 | 45 46 49 4e 45 20 49 4e |ne....#D|EFINE IN|
|00001270| 56 41 4c 49 44 5f 43 4f | 4c 55 4d 4e 5f 4c 4f 43 |VALID_CO|LUMN_LOC|
|00001280| 20 22 41 6e 20 69 6e 76 | 61 6c 69 64 20 64 69 73 | "An inv|alid dis|
|00001290| 70 6c 61 79 20 63 6f 6c | 75 6d 6e 20 6f 72 20 72 |play col|umn or r|
|000012a0| 65 74 75 72 6e 20 63 6f | 6c 75 6d 6e 20 68 61 73 |eturn co|lumn has|
|000012b0| 20 62 65 65 6e 20 73 70 | 65 63 69 66 69 65 64 20 | been sp|ecified |
|000012c0| 69 6e 20 74 68 65 20 27 | 64 69 73 70 6c 61 79 5f |in the '|display_|
|000012d0| 63 6f 6c 75 6d 6e 27 20 | 6f 72 20 27 72 65 74 75 |column' |or 'retu|
|000012e0| 72 6e 5f 63 6f 6c 75 6d | 6e 27 20 70 72 6f 70 65 |rn_colum|n' prope|
|000012f0| 72 74 69 65 73 20 28 63 | 6f 6d 62 6f 20 62 6f 78 |rties (c|ombo box|
|00001300| 20 22 20 2b 20 54 48 49 | 53 2e 6e 61 6d 65 20 2b | " + THI|S.name +|
|00001310| 20 22 29 2e 22 0d 0a 23 | 44 45 46 49 4e 45 20 49 | ")."..#|DEFINE I|
|00001320| 4e 56 41 4c 49 44 5f 54 | 41 42 4c 45 5f 4c 4f 43 |NVALID_T|ABLE_LOC|
|00001330| 20 22 41 6e 20 69 6e 76 | 61 6c 69 64 20 74 61 62 | "An inv|alid tab|
|00001340| 6c 65 20 68 61 73 20 62 | 65 65 6e 20 73 70 65 63 |le has b|een spec|
|00001350| 69 66 69 65 64 20 69 6e | 20 74 68 65 20 27 64 69 |ified in| the 'di|
|00001360| 73 70 6c 61 79 5f 63 6f | 6c 75 6d 6e 27 20 6f 72 |splay_co|lumn' or|
|00001370| 20 27 6c 6f 6f 6b 75 70 | 5f 74 61 62 6c 65 27 20 | 'lookup|_table' |
|00001380| 70 72 6f 70 65 72 74 79 | 20 28 63 6f 6d 62 6f 20 |property| (combo |
|00001390| 62 6f 78 20 22 20 2b 20 | 54 48 49 53 2e 6e 61 6d |box " + |THIS.nam|
|000013a0| 65 20 2b 20 22 29 2e 22 | 0d 0a 23 44 45 46 49 4e |e + ")."|..#DEFIN|
|000013b0| 45 20 49 4e 56 41 4c 49 | 44 5f 53 4f 52 54 5f 4c |E INVALI|D_SORT_L|
|000013c0| 4f 43 20 22 41 6e 20 69 | 6e 76 61 6c 69 64 20 63 |OC "An i|nvalid c|
|000013d0| 6f 6c 75 6d 6e 20 68 61 | 73 20 62 65 65 6e 20 73 |olumn ha|s been s|
|000013e0| 70 65 63 69 66 69 65 64 | 20 69 6e 20 74 68 65 20 |pecified| in the |
|000013f0| 27 6f 72 64 65 72 5f 63 | 6f 6c 75 6d 6e 27 20 70 |'order_c|olumn' p|
|00001400| 72 6f 70 65 72 74 79 20 | 28 63 6f 6d 62 6f 20 62 |roperty |(combo b|
|00001410| 6f 78 20 22 20 2b 20 54 | 48 49 53 2e 6e 61 6d 65 |ox " + T|HIS.name|
|00001420| 20 2b 20 22 29 2e 22 0d | 0a 0d 0a 0d 0a 0d 0a 44 | + ").".|.......D|
|00001430| 4f 20 43 41 53 45 0d 0a | 09 43 41 53 45 20 6e 45 |O CASE..|.CASE nE|
|00001440| 72 72 6f 72 20 3d 20 31 | 38 30 36 0d 0a 09 09 3d |rror = 1|806....=|
|00001450| 4d 45 53 53 41 47 45 42 | 4f 58 28 49 4e 56 41 4c |MESSAGEB|OX(INVAL|
|00001460| 49 44 5f 43 4f 4c 55 4d | 4e 5f 4c 4f 43 2c 34 38 |ID_COLUM|N_LOC,48|
|00001470| 29 0d 0a 09 43 41 53 45 | 20 6e 45 72 72 6f 72 20 |)...CASE| nError |
|00001480| 3d 20 31 38 30 38 0d 0a | 09 09 3d 4d 45 53 53 41 |= 1808..|..=MESSA|
|00001490| 47 45 42 4f 58 28 49 4e | 56 41 4c 49 44 5f 53 4f |GEBOX(IN|VALID_SO|
|000014a0| 52 54 5f 4c 4f 43 2c 34 | 38 29 0d 0a 09 43 41 53 |RT_LOC,4|8)...CAS|
|000014b0| 45 20 6e 45 72 72 6f 72 | 20 3d 20 31 38 30 32 0d |E nError| = 1802.|
|000014c0| 0a 09 09 3d 4d 45 53 53 | 41 47 45 42 4f 58 28 49 |...=MESS|AGEBOX(I|
|000014d0| 4e 56 41 4c 49 44 5f 54 | 41 42 4c 45 5f 4c 4f 43 |NVALID_T|ABLE_LOC|
|000014e0| 2c 34 38 29 0d 0a 09 4f | 54 48 45 52 57 49 53 45 |,48)...O|THERWISE|
|000014f0| 0d 0a 09 09 3d 4d 45 53 | 53 41 47 45 42 4f 58 28 |....=MES|SAGEBOX(|
|00001500| 4d 45 53 53 41 47 45 28 | 29 2c 34 38 29 0d 0a 45 |MESSAGE(|),48)..E|
|00001510| 4e 44 43 41 53 45 0d 0a | 45 4e 44 50 52 4f 43 0d |NDCASE..|ENDPROC.|
|00001520| 0a 50 52 4f 43 45 44 55 | 52 45 20 49 6e 69 74 0d |.PROCEDU|RE Init.|
|00001530| 0a 23 44 45 46 49 4e 45 | 20 4e 4f 5f 4c 4f 4f 4b |.#DEFINE| NO_LOOK|
|00001540| 55 50 5f 54 41 42 4c 45 | 5f 4c 4f 43 20 22 41 20 |UP_TABLE|_LOC "A |
|00001550| 6c 6f 6f 6b 75 70 20 74 | 61 62 6c 65 20 6d 75 73 |lookup t|able mus|
|00001560| 74 20 62 65 20 73 70 65 | 63 69 66 69 65 64 20 69 |t be spe|cified i|
|00001570| 6e 20 74 68 65 20 27 6c | 6f 6f 6b 75 70 5f 74 61 |n the 'l|ookup_ta|
|00001580| 62 6c 65 27 20 70 72 6f | 70 65 72 74 79 20 28 63 |ble' pro|perty (c|
|00001590| 6f 6d 62 6f 20 62 6f 78 | 20 22 20 2b 20 54 48 49 |ombo box| " + THI|
|000015a0| 53 2e 6e 61 6d 65 20 2b | 20 22 29 2e 22 0d 0a 23 |S.name +| ")."..#|
|000015b0| 44 45 46 49 4e 45 20 4e | 4f 5f 44 49 53 50 4c 41 |DEFINE N|O_DISPLA|
|000015c0| 59 5f 43 4f 4c 55 4d 4e | 5f 4c 4f 43 20 22 41 20 |Y_COLUMN|_LOC "A |
|000015d0| 64 69 73 70 6c 61 79 20 | 63 6f 6c 75 6d 6e 20 6d |display |column m|
|000015e0| 75 73 74 20 62 65 20 73 | 70 65 63 69 66 69 65 64 |ust be s|pecified|
|000015f0| 20 69 6e 20 74 68 65 20 | 27 64 69 73 70 6c 61 79 | in the |'display|
|00001600| 5f 63 6f 6c 75 6d 6e 27 | 20 70 72 6f 70 65 72 74 |_column'| propert|
|00001610| 79 20 28 63 6f 6d 62 6f | 20 62 6f 78 20 22 20 2b |y (combo| box " +|
|00001620| 20 54 48 49 53 2e 6e 61 | 6d 65 20 2b 20 22 29 2e | THIS.na|me + ").|
|00001630| 22 0d 0a 23 44 45 46 49 | 4e 45 20 4e 4f 5f 52 45 |"..#DEFI|NE NO_RE|
|00001640| 54 55 52 4e 5f 43 4f 4c | 55 4d 4e 5f 4c 4f 43 20 |TURN_COL|UMN_LOC |
|00001650| 22 41 20 72 65 74 75 72 | 6e 20 63 6f 6c 75 6d 6e |"A retur|n column|
|00001660| 20 6d 75 73 74 20 62 65 | 20 73 70 65 63 69 66 69 | must be| specifi|
|00001670| 65 64 20 69 6e 20 74 68 | 65 20 27 72 65 74 75 72 |ed in th|e 'retur|
|00001680| 6e 5f 63 6f 6c 75 6d 6e | 27 20 70 72 6f 70 65 72 |n_column|' proper|
|00001690| 74 79 20 28 63 6f 6d 62 | 6f 20 62 6f 78 20 22 20 |ty (comb|o box " |
|000016a0| 2b 20 54 48 49 53 2e 6e | 61 6d 65 20 2b 20 22 29 |+ THIS.n|ame + ")|
|000016b0| 2e 22 0d 0a 0d 0a 6c 4f | 4b 20 3d 20 2e 54 2e 0d |."....lO|K = .T..|
|000016c0| 0a 44 4f 20 43 41 53 45 | 0d 0a 09 43 41 53 45 20 |.DO CASE|...CASE |
|000016d0| 45 4d 50 54 59 28 54 48 | 49 53 2e 6c 6f 6f 6b 75 |EMPTY(TH|IS.looku|
|000016e0| 70 5f 74 61 62 6c 65 29 | 0d 0a 09 09 3d 4d 45 53 |p_table)|....=MES|
|000016f0| 53 41 47 45 42 4f 58 28 | 4e 4f 5f 4c 4f 4f 4b 55 |SAGEBOX(|NO_LOOKU|
|00001700| 50 5f 54 41 42 4c 45 5f | 4c 4f 43 2c 34 38 29 0d |P_TABLE_|LOC,48).|
|00001710| 0a 09 09 6c 4f 4b 20 3d | 20 2e 46 2e 0d 0a 09 43 |...lOK =| .F....C|
|00001720| 41 53 45 20 45 4d 50 54 | 59 28 54 48 49 53 2e 64 |ASE EMPT|Y(THIS.d|
|00001730| 69 73 70 6c 61 79 5f 63 | 6f 6c 75 6d 6e 29 0d 0a |isplay_c|olumn)..|
|00001740| 09 09 3d 4d 45 53 53 41 | 47 45 42 4f 58 28 4e 4f |..=MESSA|GEBOX(NO|
|00001750| 5f 44 49 53 50 4c 41 59 | 5f 43 4f 4c 55 4d 4e 5f |_DISPLAY|_COLUMN_|
|00001760| 4c 4f 43 2c 34 38 29 0d | 0a 09 09 6c 4f 4b 20 3d |LOC,48).|...lOK =|
|00001770| 20 2e 46 2e 0d 0a 09 43 | 41 53 45 20 45 4d 50 54 | .F....C|ASE EMPT|
|00001780| 59 28 54 48 49 53 2e 72 | 65 74 75 72 6e 5f 63 6f |Y(THIS.r|eturn_co|
|00001790| 6c 75 6d 6e 29 0d 0a 09 | 09 3d 4d 45 53 53 41 47 |lumn)...|.=MESSAG|
|000017a0| 45 42 4f 58 28 4e 4f 5f | 52 45 54 55 52 4e 5f 43 |EBOX(NO_|RETURN_C|
|000017b0| 4f 4c 55 4d 4e 5f 4c 4f | 43 2c 34 38 29 0d 0a 09 |OLUMN_LO|C,48)...|
|000017c0| 09 6c 4f 4b 20 3d 20 2e | 46 2e 0d 0a 45 4e 44 43 |.lOK = .|F...ENDC|
|000017d0| 41 53 45 0d 0a 0d 0a 49 | 46 20 6c 4f 4b 20 54 48 |ASE....I|F lOK TH|
|000017e0| 45 4e 0d 0a 09 49 46 20 | 21 45 4d 50 54 59 28 54 |EN...IF |!EMPTY(T|
|000017f0| 48 49 53 2e 6f 72 64 65 | 72 5f 63 6f 6c 75 6d 6e |HIS.orde|r_column|
|00001800| 29 0d 0a 09 09 6e 53 51 | 4c 20 3d 20 22 53 45 4c |)....nSQ|L = "SEL|
|00001810| 45 43 54 20 22 20 2b 20 | 54 48 49 53 2e 64 69 73 |ECT " + |THIS.dis|
|00001820| 70 6c 61 79 5f 63 6f 6c | 75 6d 6e 20 2b 20 22 2c |play_col|umn + ",|
|00001830| 22 20 2b 20 54 48 49 53 | 2e 72 65 74 75 72 6e 5f |" + THIS|.return_|
|00001840| 63 6f 6c 75 6d 6e 20 2b | 20 22 20 46 52 4f 4d 20 |column +| " FROM |
|00001850| 22 20 2b 20 54 48 49 53 | 2e 6c 6f 6f 6b 75 70 5f |" + THIS|.lookup_|
|00001860| 74 61 62 6c 65 20 2b 20 | 22 20 4f 52 44 45 52 20 |table + |" ORDER |
|00001870| 42 59 20 22 20 2b 20 54 | 48 49 53 2e 6f 72 64 65 |BY " + T|HIS.orde|
|00001880| 72 5f 63 6f 6c 75 6d 6e | 20 2b 20 22 20 49 4e 54 |r_column| + " INT|
|00001890| 4f 20 43 55 52 53 4f 52 | 20 22 20 2b 20 54 48 49 |O CURSOR| " + THI|
|000018a0| 53 2e 6e 61 6d 65 0d 0a | 09 45 4c 53 45 0d 0a 09 |S.name..|.ELSE...|
|000018b0| 09 6e 53 51 4c 20 3d 20 | 22 53 45 4c 45 43 54 20 |.nSQL = |"SELECT |
|000018c0| 22 20 2b 20 54 48 49 53 | 2e 64 69 73 70 6c 61 79 |" + THIS|.display|
|000018d0| 5f 63 6f 6c 75 6d 6e 20 | 2b 20 22 2c 22 20 2b 20 |_column |+ "," + |
|000018e0| 54 48 49 53 2e 72 65 74 | 75 72 6e 5f 63 6f 6c 75 |THIS.ret|urn_colu|
|000018f0| 6d 6e 20 2b 20 22 20 46 | 52 4f 4d 20 22 20 2b 20 |mn + " F|ROM " + |
|00001900| 54 48 49 53 2e 6c 6f 6f | 6b 75 70 5f 74 61 62 6c |THIS.loo|kup_tabl|
|00001910| 65 20 2b 20 22 20 49 4e | 54 4f 20 43 55 52 53 4f |e + " IN|TO CURSO|
|00001920| 52 20 22 20 2b 20 54 48 | 49 53 2e 6e 61 6d 65 0d |R " + TH|IS.name.|
|00001930| 0a 09 45 4e 44 49 46 0d | 0a 09 54 48 49 53 2e 52 |..ENDIF.|..THIS.R|
|00001940| 6f 77 53 6f 75 72 63 65 | 54 79 70 65 20 3d 20 33 |owSource|Type = 3|
|00001950| 0d 0a 09 54 48 49 53 2e | 52 6f 77 53 6f 75 72 63 |...THIS.|RowSourc|
|00001960| 65 20 3d 20 6e 53 51 4c | 0d 0a 09 54 48 49 53 2e |e = nSQL|...THIS.|
|00001970| 42 6f 75 6e 64 43 6f 6c | 75 6d 6e 20 3d 20 32 0d |BoundCol|umn = 2.|
|00001980| 0a 45 4e 44 49 46 0d 0a | 54 48 49 53 2e 52 65 66 |.ENDIF..|THIS.Ref|
|00001990| 72 65 73 68 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 00 |resh..EN|DPROC...|
|000019a0| 00 00 01 00 00 00 a2 46 | 6f 6e 74 4e 61 6d 65 20 |.......F|ontName |
|000019b0| 3d 20 22 4d 53 20 53 61 | 6e 73 20 53 65 72 69 66 |= "MS Sa|ns Serif|
|000019c0| 22 0d 0a 46 6f 6e 74 53 | 69 7a 65 20 3d 20 38 0d |"..FontS|ize = 8.|
|000019d0| 0a 48 65 69 67 68 74 20 | 3d 20 32 33 0d 0a 57 69 |.Height |= 23..Wi|
|000019e0| 64 74 68 20 3d 20 31 37 | 31 0d 0a 64 69 73 70 6c |dth = 17|1..displ|
|000019f0| 61 79 5f 63 6f 6c 75 6d | 6e 20 3d 20 0d 0a 6c 6f |ay_colum|n = ..lo|
|00001a00| 6f 6b 75 70 5f 74 61 62 | 6c 65 20 3d 20 0d 0a 72 |okup_tab|le = ..r|
|00001a10| 65 74 75 72 6e 5f 63 6f | 6c 75 6d 6e 20 3d 20 0d |eturn_co|lumn = .|
|00001a20| 0a 6f 72 64 65 72 5f 63 | 6f 6c 75 6d 6e 20 3d 20 |.order_c|olumn = |
|00001a30| 0d 0a 4e 61 6d 65 20 3d | 20 22 6c 6f 6f 6b 75 70 |..Name =| "lookup|
|00001a40| 5f 63 6f 6d 62 6f 22 0d | 0a 00 00 00 01 00 00 00 |_combo".|........|
|00001a50| 08 63 6f 6d 62 6f 62 6f | 78 00 00 00 01 00 00 00 |.combobo|x.......|
|00001a60| f5 50 52 4f 43 45 44 55 | 52 45 20 43 6c 69 63 6b |.PROCEDU|RE Click|
|00001a70| 0d 0a 49 46 20 21 45 4d | 50 54 59 28 54 48 49 53 |..IF !EM|PTY(THIS|
|00001a80| 2e 70 61 72 65 6e 74 2e | 63 4e 61 76 69 67 61 74 |.parent.|cNavigat|
|00001a90| 69 6f 6e 5f 74 61 62 6c | 65 29 0d 0a 09 53 45 4c |ion_tabl|e)...SEL|
|00001aa0| 45 43 54 20 28 54 48 49 | 53 2e 70 61 72 65 6e 74 |ECT (THI|S.parent|
|00001ab0| 2e 63 4e 61 76 69 67 61 | 74 69 6f 6e 5f 74 61 62 |.cNaviga|tion_tab|
|00001ac0| 6c 65 29 0d 0a 45 4e 44 | 49 46 0d 0a 0d 0a 2a 20 |le)..END|IF....* |
|00001ad0| 49 66 20 61 74 20 6e 6f | 74 20 61 74 20 65 6e 64 |If at no|t at end|
|00001ae0| 2d 6f 66 2d 66 69 6c 65 | 2c 20 67 6f 20 74 6f 20 |-of-file|, go to |
|00001af0| 6c 61 73 74 20 72 65 63 | 6f 72 64 20 69 6e 20 74 |last rec|ord in t|
|00001b00| 61 62 6c 65 0d 0a 49 46 | 20 21 45 4f 46 28 29 20 |able..IF| !EOF() |
|00001b10| 0d 0a 09 47 4f 20 42 4f | 54 54 4f 4d 0d 0a 45 4e |...GO BO|TTOM..EN|
|00001b20| 44 49 46 0d 0a 0d 0a 2a | 20 52 65 66 72 65 73 68 |DIF....*| Refresh|
|00001b30| 20 74 68 65 20 66 6f 72 | 6d 0d 0a 54 48 49 53 46 | the for|m..THISF|
|00001b40| 4f 52 4d 2e 52 65 66 72 | 65 73 68 0d 0a 45 4e 44 |ORM.Refr|esh..END|
|00001b50| 50 52 4f 43 0d 0a 00 00 | 00 01 00 00 00 07 63 6f |PROC....|......co|
|00001b60| 6e 74 72 6f 6c 00 00 00 | 01 00 00 00 06 63 75 73 |ntrol...|.....cus|
|00001b70| 74 6f 6d 00 00 00 01 00 | 00 00 05 43 6c 61 73 73 |tom.....|...Class|
|00001b80| 00 00 00 01 00 00 00 06 | 63 75 73 74 6f 6d 00 00 |........|custom..|
|00001b90| 00 01 00 00 00 1f 2e 2e | 5c 2e 2e 5c 2e 2e 5c 2e |........|\..\..\.|
|00001ba0| 2e 5c 63 6c 61 73 73 65 | 73 5c 63 68 65 63 6b 65 |.\classe|s\checke|
|00001bb0| 72 2e 62 6d 70 00 00 00 | 01 00 00 00 11 6d 61 6e |r.bmp...|.....man|
|00001bc0| 61 67 65 73 20 63 6f 6e | 66 6c 69 63 74 73 00 00 |ages con|flicts..|
|00001bd0| 00 01 00 00 00 1d 5c 2e | 2e 5c 2e 2e 5c 2e 2e 5c |......\.|.\..\..\|
|00001be0| 63 6c 61 73 73 65 73 5c | 63 68 65 63 6b 65 72 2e |classes\|checker.|
|00001bf0| 62 6d 70 00 00 00 01 00 | 00 01 34 fe f2 ff 20 02 |bmp.....|..4... .|
|00001c00| 01 00 00 00 1b 01 00 00 | 1b 01 00 00 00 00 00 00 |........|........|
|00001c10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001c20| 00 00 23 cf 01 00 00 00 | 25 00 00 00 b1 00 00 00 |..#.....|%.......|
|00001c30| 00 00 00 00 d2 00 00 00 | 09 00 00 00 c0 00 00 00 |........|........|
|00001c40| 00 00 00 00 00 00 00 00 | fc 03 00 03 00 55 00 00 |........|.....U..|
|00001c50| 4d 00 16 00 25 fc 43 f4 | 00 00 f4 01 00 f7 02 00 |M...%.C.|........|
|00001c60| a1 0a fd f9 05 26 00 fe | 10 00 46 fc f4 00 00 f4 |.....&..|..F.....|
|00001c70| 01 00 f7 02 00 03 fd fe | 04 00 1e fe 0d 00 25 fc |........|......%.|
|00001c80| 43 2b 0a fd f9 05 3c 00 | fe 05 00 23 36 fe 04 00 |C+....<.|...#6...|
|00001c90| 1e fe 0a 00 99 f4 03 00 | f7 04 00 fe 03 00 55 05 |........|......U.|
|00001ca0| 00 04 00 54 48 49 53 06 | 00 50 41 52 45 4e 54 11 |...THIS.|.PARENT.|
|00001cb0| 00 43 4e 41 56 49 47 41 | 54 49 4f 4e 5f 54 41 42 |.CNAVIGA|TION_TAB|
|00001cc0| 4c 45 08 00 54 48 49 53 | 46 4f 52 4d 07 00 52 45 |LE..THIS|FORM..RE|
|00001cd0| 46 52 45 53 48 05 00 43 | 6c 69 63 6b 2c 00 00 00 |FRESH..C|lick,...|
|00001ce0| 00 00 ff ff 31 00 61 01 | 01 01 41 00 d3 00 51 00 |....1.a.|..A...Q.|
|00001cf0| 41 00 a3 00 31 00 00 00 | 00 00 00 00 00 00 00 00 |A...1...|........|
|00001d00| 00 00 00 00 00 00 01 00 | 00 00 11 00 00 00 ea 00 |........|........|
|00001d10| 00 00 01 00 00 00 00 29 | 00 00 00 1b 01 00 00 00 |.......)|........|
|00001d20| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d30| 00 00 01 00 00 01 48 fe | f2 ff 20 02 01 00 00 00 |......H.|.. .....|
|00001d40| 2f 01 00 00 2f 01 00 00 | 00 00 00 00 00 00 00 00 |/.../...|........|
|00001d50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 8c fa |........|........|
|00001d60| 01 00 00 00 25 00 00 00 | c1 00 00 00 00 00 00 00 |....%...|........|
|00001d70| e6 00 00 00 0b 00 00 00 | d0 00 00 00 00 00 00 00 |........|........|
|00001d80| 00 00 00 00 fc 03 00 03 | 00 55 00 00 5d 00 16 00 |........|.U..]...|
|00001d90| 25 fc 43 f4 00 00 f4 01 | 00 f7 02 00 a1 0a fd f9 |%.C.....|........|
|00001da0| 05 26 00 fe 10 00 46 fc | f4 00 00 f4 01 00 f7 02 |.&....F.|........|
|00001db0| 00 03 fd fe 04 00 1e fe | 0c 00 25 fc 43 2b fd f9 |........|..%.C+..|
|00001dc0| 05 3b 00 fe 05 00 23 29 | fe 08 00 1b f9 05 4c 00 |.;....#)|......L.|
|00001dd0| fe 09 00 48 fc f8 01 01 | fd fe 04 00 1e fe 0a 00 |...H....|........|
|00001de0| 99 f4 03 00 f7 04 00 fe | 03 00 55 05 00 04 00 54 |........|..U....T|
|00001df0| 48 49 53 06 00 50 41 52 | 45 4e 54 11 00 43 4e 41 |HIS..PAR|ENT..CNA|
|00001e00| 56 49 47 41 54 49 4f 4e | 5f 54 41 42 4c 45 08 00 |VIGATION|_TABLE..|
|00001e10| 54 48 49 53 46 4f 52 4d | 07 00 52 45 46 52 45 53 |THISFORM|..REFRES|
|00001e20| 48 05 00 43 6c 69 63 6b | 2c 00 00 00 00 00 ff ff |H..Click|,.......|
|00001e30| 31 00 61 01 01 01 41 00 | c4 00 51 00 81 00 92 00 |1.a...A.|..Q.....|
|00001e40| 41 00 a3 00 31 00 00 00 | 00 00 00 00 00 00 00 00 |A...1...|........|
|00001e50| 00 00 00 00 00 00 01 00 | 00 00 11 00 00 00 3d 01 |........|......=.|
|00001e60| 00 00 01 00 00 00 00 29 | 00 00 00 2f 01 00 00 00 |.......)|.../....|
|00001e70| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e80| 00 00 01 00 00 01 48 50 | 52 4f 43 45 44 55 52 45 |......HP|ROCEDURE|
|00001e90| 20 43 6c 69 63 6b 0d 0a | 49 46 20 21 45 4d 50 54 | Click..|IF !EMPT|
|00001ea0| 59 28 54 48 49 53 2e 70 | 61 72 65 6e 74 2e 63 4e |Y(THIS.p|arent.cN|
|00001eb0| 61 76 69 67 61 74 69 6f | 6e 5f 74 61 62 6c 65 29 |avigatio|n_table)|
|00001ec0| 20 0d 0a 09 53 45 4c 45 | 43 54 20 28 54 48 49 53 | ...SELE|CT (THIS|
|00001ed0| 2e 70 61 72 65 6e 74 2e | 63 4e 61 76 69 67 61 74 |.parent.|cNavigat|
|00001ee0| 69 6f 6e 5f 74 61 62 6c | 65 29 0d 0a 45 4e 44 49 |ion_tabl|e)..ENDI|
|00001ef0| 46 0d 0a 0d 0a 2a 20 49 | 66 20 74 61 62 6c 65 20 |F....* I|f table |
|00001f00| 70 6f 69 6e 74 65 72 20 | 69 73 20 61 74 20 74 68 |pointer |is at th|
|00001f10| 65 20 65 6e 64 2d 6f 66 | 2d 74 61 62 6c 65 2c 20 |e end-of|-table, |
|00001f20| 74 68 65 6e 0d 0a 2a 20 | 72 6f 6c 6c 6f 76 65 72 |then..* |rollover|
|00001f30| 20 74 6f 20 74 68 65 20 | 66 69 72 73 74 20 72 65 | to the |first re|
|00001f40| 63 6f 72 64 20 69 6e 20 | 74 68 65 20 74 61 62 6c |cord in |the tabl|
|00001f50| 65 0d 0a 49 46 20 45 4f | 46 28 29 20 0d 0a 09 47 |e..IF EO|F() ...G|
|00001f60| 4f 20 54 4f 50 0d 0a 45 | 4c 53 45 0d 0a 09 2a 20 |O TOP..E|LSE...* |
|00001f70| 4f 74 68 65 72 77 69 73 | 65 2c 20 67 6f 20 74 6f |Otherwis|e, go to|
|00001f80| 20 6e 65 78 74 20 72 65 | 63 6f 72 64 0d 0a 09 53 | next re|cord...S|
|00001f90| 4b 49 50 20 31 0d 0a 45 | 4e 44 49 46 0d 0a 0d 0a |KIP 1..E|NDIF....|
|00001fa0| 2a 20 52 65 66 72 65 73 | 68 20 74 68 65 20 66 6f |* Refres|h the fo|
|00001fb0| 72 6d 0d 0a 54 48 49 53 | 46 4f 52 4d 2e 52 65 66 |rm..THIS|FORM.Ref|
|00001fc0| 72 65 73 68 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 00 |resh..EN|DPROC...|
|00001fd0| 00 00 01 00 00 00 b8 41 | 75 74 6f 53 69 7a 65 20 |.......A|utoSize |
|00001fe0| 3d 20 2e 46 2e 0d 0a 54 | 6f 70 20 3d 20 31 0d 0a |= .F...T|op = 1..|
|00001ff0| 4c 65 66 74 20 3d 20 31 | 30 36 0d 0a 48 65 69 67 |Left = 1|06..Heig|
|00002000| 68 74 20 3d 20 32 37 0d | 0a 57 69 64 74 68 20 3d |ht = 27.|.Width =|
|00002010| 20 34 32 0d 0a 50 69 63 | 74 75 72 65 20 3d 20 2e | 42..Pic|ture = .|
|00002020| 2e 5c 2e 2e 5c 2e 2e 5c | 2e 2e 5c 2e 2e 5c 2e 2e |.\..\..\|..\..\..|
|00002030| 5c 74 65 73 74 69 6e 67 | 5c 0d 0a 44 69 73 61 62 |\testing|\..Disab|
|00002040| 6c 65 64 50 69 63 74 75 | 72 65 20 3d 20 2e 2e 5c |ledPictu|re = ..\|
|00002050| 2e 2e 5c 2e 2e 5c 2e 2e | 5c 2e 2e 5c 2e 2e 5c 74 |..\..\..|\..\..\t|
|00002060| 65 73 74 69 6e 67 5c 0d | 0a 43 61 70 74 69 6f 6e |esting\.|.Caption|
|00002070| 20 3d 20 22 5c 3c 4e 65 | 78 74 22 0d 0a 4e 61 6d | = "\<Ne|xt"..Nam|
|00002080| 65 20 3d 20 22 63 6d 64 | 4e 65 78 74 22 0d 0a 00 |e = "cmd|Next"...|
|00002090| 00 00 01 00 00 01 49 fe | f2 ff 20 02 01 00 00 00 |......I.|.. .....|
|000020a0| 30 01 00 00 30 01 00 00 | 00 00 00 00 00 00 00 00 |0...0...|........|
|000020b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 80 35 |........|.......5|
|000020c0| 01 00 00 00 25 00 00 00 | c2 00 00 00 00 00 00 00 |....%...|........|
|000020d0| e7 00 00 00 0b 00 00 00 | d1 00 00 00 00 00 00 00 |........|........|
|000020e0| 00 00 00 00 fc 03 00 03 | 00 55 00 00 5e 00 16 00 |........|.U..^...|
|000020f0| 25 fc 43 f4 00 00 f4 01 | 00 f7 02 00 a1 0a fd f9 |%.C.....|........|
|00002100| 05 26 00 fe 10 00 46 fc | f4 00 00 f4 01 00 f7 02 |.&....F.|........|
|00002110| 00 03 fd fe 04 00 1e fe | 0c 00 25 fc 43 1e fd f9 |........|..%.C...|
|00002120| 05 3b 00 fe 05 00 23 36 | fe 08 00 1b f9 05 4d 00 |.;....#6|......M.|
|00002130| fe 0a 00 48 fc f9 02 ff | ff fd fe 04 00 1e fe 0a |...H....|........|
|00002140| 00 99 f4 03 00 f7 04 00 | fe 03 00 55 05 00 04 00 |........|...U....|
|00002150| 54 48 49 53 06 00 50 41 | 52 45 4e 54 11 00 43 4e |THIS..PA|RENT..CN|
|00002160| 41 56 49 47 41 54 49 4f | 4e 5f 54 41 42 4c 45 08 |AVIGATIO|N_TABLE.|
|00002170| 00 54 48 49 53 46 4f 52 | 4d 07 00 52 45 46 52 45 |.THISFOR|M..REFRE|
|00002180| 53 48 05 00 43 6c 69 63 | 6b 2c 00 00 00 00 00 ff |SH..Clic|k,......|
|00002190| ff 31 00 61 01 01 01 41 | 00 c4 00 51 00 81 00 a2 |.1.a...A|...Q....|
|000021a0| 00 41 00 a3 00 31 00 00 | 00 00 00 00 00 00 00 00 |.A...1..|........|
|000021b0| 00 00 00 00 00 00 00 01 | 00 00 00 11 00 00 00 4a |........|.......J|
|000021c0| 01 00 00 01 00 00 00 00 | 29 00 00 00 30 01 00 00 |........|)...0...|
|000021d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021e0| 00 00 00 01 00 00 01 55 | 50 52 4f 43 45 44 55 52 |.......U|PROCEDUR|
|000021f0| 45 20 43 6c 69 63 6b 0d | 0a 49 46 20 21 45 4d 50 |E Click.|.IF !EMP|
|00002200| 54 59 28 54 48 49 53 2e | 70 61 72 65 6e 74 2e 63 |TY(THIS.|parent.c|
|00002210| 4e 61 76 69 67 61 74 69 | 6f 6e 5f 74 61 62 6c 65 |Navigati|on_table|
|00002220| 29 20 0d 0a 09 53 45 4c | 45 43 54 20 28 54 48 49 |) ...SEL|ECT (THI|
|00002230| 53 2e 70 61 72 65 6e 74 | 2e 63 4e 61 76 69 67 61 |S.parent|.cNaviga|
|00002240| 74 69 6f 6e 5f 74 61 62 | 6c 65 29 0d 0a 45 4e 44 |tion_tab|le)..END|
|00002250| 49 46 0d 0a 0d 0a 2a 20 | 49 66 20 74 61 62 6c 65 |IF....* |If table|
|00002260| 20 70 6f 69 6e 74 65 72 | 20 69 73 20 61 74 20 74 | pointer| is at t|
|00002270| 68 65 20 62 65 67 69 6e | 6e 69 6e 67 2d 6f 66 2d |he begin|ning-of-|
|00002280| 74 61 62 6c 65 2c 20 74 | 68 65 6e 0d 0a 2a 20 72 |table, t|hen..* r|
|00002290| 6f 6c 6c 6f 76 65 72 20 | 74 6f 20 74 68 65 20 6c |ollover |to the l|
|000022a0| 61 73 74 20 72 65 63 6f | 72 64 20 69 6e 20 74 68 |ast reco|rd in th|
|000022b0| 65 20 74 61 62 6c 65 0d | 0a 49 46 20 42 4f 46 28 |e table.|.IF BOF(|
|000022c0| 29 20 0d 0a 09 47 4f 20 | 42 4f 54 54 4f 4d 0d 0a |) ...GO |BOTTOM..|
|000022d0| 45 4c 53 45 0d 0a 09 2a | 20 4f 74 68 65 72 77 69 |ELSE...*| Otherwi|
|000022e0| 73 65 2c 20 67 6f 20 74 | 6f 20 70 72 65 76 69 6f |se, go t|o previo|
|000022f0| 75 73 20 72 65 63 6f 72 | 64 0d 0a 09 53 4b 49 50 |us recor|d...SKIP|
|00002300| 20 2d 31 0d 0a 45 4e 44 | 49 46 0d 0a 0d 0a 2a 20 | -1..END|IF....* |
|00002310| 52 65 66 72 65 73 68 20 | 74 68 65 20 66 6f 72 6d |Refresh |the form|
|00002320| 0d 0a 54 48 49 53 46 4f | 52 4d 2e 52 65 66 72 65 |..THISFO|RM.Refre|
|00002330| 73 68 0d 0a 45 4e 44 50 | 52 4f 43 0d 0a 00 00 00 |sh..ENDP|ROC.....|
|00002340| 01 00 00 00 bb 41 75 74 | 6f 53 69 7a 65 20 3d 20 |.....Aut|oSize = |
|00002350| 2e 46 2e 0d 0a 54 6f 70 | 20 3d 20 31 0d 0a 4c 65 |.F...Top| = 1..Le|
|00002360| 66 74 20 3d 20 35 32 0d | 0a 48 65 69 67 68 74 20 |ft = 52.|.Height |
|00002370| 3d 20 32 37 0d 0a 57 69 | 64 74 68 20 3d 20 34 32 |= 27..Wi|dth = 42|
|00002380| 0d 0a 50 69 63 74 75 72 | 65 20 3d 20 2e 2e 5c 2e |..Pictur|e = ..\.|
|00002390| 2e 5c 2e 2e 5c 2e 2e 5c | 2e 2e 5c 2e 2e 5c 74 65 |.\..\..\|..\..\te|
|000023a0| 73 74 69 6e 67 5c 0d 0a | 44 69 73 61 62 6c 65 64 |sting\..|Disabled|
|000023b0| 50 69 63 74 75 72 65 20 | 3d 20 2e 2e 5c 2e 2e 5c |Picture |= ..\..\|
|000023c0| 2e 2e 5c 2e 2e 5c 2e 2e | 5c 2e 2e 5c 74 65 73 74 |..\..\..|\..\test|
|000023d0| 69 6e 67 5c 0d 0a 43 61 | 70 74 69 6f 6e 20 3d 20 |ing\..Ca|ption = |
|000023e0| 22 5c 3c 50 72 65 76 22 | 0d 0a 4e 61 6d 65 20 3d |"\<Prev"|..Name =|
|000023f0| 20 22 63 6d 64 50 72 65 | 76 69 6f 75 73 22 0d 0a | "cmdPre|vious"..|
|00002400| 00 00 00 01 00 00 01 34 | fe f2 ff 20 02 01 00 00 |.......4|... ....|
|00002410| 00 1b 01 00 00 1b 01 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002420| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 23 |........|.......#|
|00002430| cf 01 00 00 00 25 00 00 | 00 b1 00 00 00 00 00 00 |.....%..|........|
|00002440| 00 d2 00 00 00 09 00 00 | 00 c0 00 00 00 00 00 00 |........|........|
|00002450| 00 00 00 00 00 fc 03 00 | 03 00 55 00 00 4d 00 16 |........|..U..M..|
|00002460| 00 25 fc 43 f4 00 00 f4 | 01 00 f7 02 00 a1 0a fd |.%.C....|........|
|00002470| f9 05 26 00 fe 10 00 46 | fc f4 00 00 f4 01 00 f7 |..&....F|........|
|00002480| 02 00 03 fd fe 04 00 1e | fe 0d 00 25 fc 43 2b 0a |........|...%.C+.|
|00002490| fd f9 05 3c 00 fe 05 00 | 23 29 fe 04 00 1e fe 0a |...<....|#)......|
|000024a0| 00 99 f4 03 00 f7 04 00 | fe 03 00 55 05 00 04 00 |........|...U....|
|000024b0| 54 48 49 53 06 00 50 41 | 52 45 4e 54 11 00 43 4e |THIS..PA|RENT..CN|
|000024c0| 41 56 49 47 41 54 49 4f | 4e 5f 54 41 42 4c 45 08 |AVIGATIO|N_TABLE.|
|000024d0| 00 54 48 49 53 46 4f 52 | 4d 07 00 52 45 46 52 45 |.THISFOR|M..REFRE|
|000024e0| 53 48 05 00 43 6c 69 63 | 6b 2c 00 00 00 00 00 ff |SH..Clic|k,......|
|000024f0| ff 31 00 61 01 01 01 41 | 00 d3 00 51 00 41 00 a3 |.1.a...A|...Q.A..|
|00002500| 00 31 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.1......|........|
|00002510| 00 00 00 01 00 00 00 11 | 00 00 00 fa 00 00 00 01 |........|........|
|00002520| 00 00 00 00 29 00 00 00 | 1b 01 00 00 00 00 00 00 |....)...|........|
|00002530| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 01 |........|........|
|00002540| 00 00 01 05 50 52 4f 43 | 45 44 55 52 45 20 43 6c |....PROC|EDURE Cl|
|00002550| 69 63 6b 0d 0a 49 46 20 | 21 45 4d 50 54 59 28 54 |ick..IF |!EMPTY(T|
|00002560| 48 49 53 2e 70 61 72 65 | 6e 74 2e 63 4e 61 76 69 |HIS.pare|nt.cNavi|
|00002570| 67 61 74 69 6f 6e 5f 74 | 61 62 6c 65 29 20 54 48 |gation_t|able) TH|
|00002580| 45 4e 0d 0a 09 53 45 4c | 45 43 54 20 28 54 48 49 |EN...SEL|ECT (THI|
|00002590| 53 2e 70 61 72 65 6e 74 | 2e 63 4e 61 76 69 67 61 |S.parent|.cNaviga|
|000025a0| 74 69 6f 6e 5f 74 61 62 | 6c 65 29 0d 0a 45 4e 44 |tion_tab|le)..END|
|000025b0| 49 46 0d 0a 0d 0a 2a 20 | 49 66 20 61 74 20 6e 6f |IF....* |If at no|
|000025c0| 74 20 61 74 20 74 68 65 | 20 62 65 67 69 6e 6e 6e |t at the| beginnn|
|000025d0| 67 2d 6f 66 2d 66 69 6c | 65 2c 20 67 6f 20 74 6f |g-of-fil|e, go to|
|000025e0| 20 66 69 72 73 74 20 72 | 65 63 6f 72 64 20 69 6e | first r|ecord in|
|000025f0| 20 74 61 62 6c 65 0d 0a | 49 46 20 21 45 4f 46 28 | table..|IF !EOF(|
|00002600| 29 20 54 48 45 4e 0d 0a | 09 47 4f 20 54 4f 50 0d |) THEN..|.GO TOP.|
|00002610| 0a 45 4e 44 49 46 0d 0a | 0d 0a 2a 20 52 65 66 72 |.ENDIF..|..* Refr|
|00002620| 65 73 68 20 74 68 65 20 | 66 6f 72 6d 0d 0a 54 48 |esh the |form..TH|
|00002630| 49 53 46 4f 52 4d 2e 52 | 65 66 72 65 73 68 0d 0a |ISFORM.R|efresh..|
|00002640| 45 4e 44 50 52 4f 43 0d | 0a 00 00 00 01 00 00 00 |ENDPROC.|........|
|00002650| b4 41 75 74 6f 53 69 7a | 65 20 3d 20 2e 46 2e 0d |.AutoSiz|e = .F..|
|00002660| 0a 54 6f 70 20 3d 20 31 | 0d 0a 4c 65 66 74 20 3d |.Top = 1|..Left =|
|00002670| 20 31 0d 0a 48 65 69 67 | 68 74 20 3d 20 32 37 0d | 1..Heig|ht = 27.|
|00002680| 0a 57 69 64 74 68 20 3d | 20 33 39 0d 0a 50 69 63 |.Width =| 39..Pic|
|00002690| 74 75 72 65 20 3d 20 2e | 2e 5c 2e 2e 5c 2e 2e 5c |ture = .|.\..\..\|
|000026a0| 2e 2e 5c 2e 2e 5c 2e 2e | 5c 74 65 73 74 69 6e 67 |..\..\..|\testing|
|000026b0| 5c 0d 0a 44 69 73 61 62 | 6c 65 64 50 69 63 74 75 |\..Disab|ledPictu|
|000026c0| 72 65 20 3d 20 2e 2e 5c | 2e 2e 5c 2e 2e 5c 2e 2e |re = ..\|..\..\..|
|000026d0| 5c 2e 2e 5c 2e 2e 5c 74 | 65 73 74 69 6e 67 5c 0d |\..\..\t|esting\.|
|000026e0| 0a 43 61 70 74 69 6f 6e | 20 3d 20 22 5c 3c 54 6f |.Caption| = "\<To|
|000026f0| 70 22 0d 0a 4e 61 6d 65 | 20 3d 20 22 63 6d 64 54 |p"..Name| = "cmdT|
|00002700| 6f 70 22 0d 0a 00 00 00 | 01 00 00 00 5a 63 6e 61 |op".....|....Zcna|
|00002710| 76 69 67 61 74 69 6f 6e | 5f 74 61 62 6c 65 20 53 |vigation|_table S|
|00002720| 70 65 63 69 66 69 65 73 | 20 74 68 65 20 74 61 62 |pecifies| the tab|
|00002730| 6c 65 20 74 6f 20 6e 61 | 76 69 67 61 74 65 20 69 |le to na|vigate i|
|00002740| 6e 2e 20 20 49 66 20 62 | 6c 61 6e 6b 2c 20 75 73 |n. If b|lank, us|
|00002750| 65 73 20 74 68 65 20 63 | 75 72 72 65 6e 74 20 74 |es the c|urrent t|
|00002760| 61 62 6c 65 2e 0d 0a 00 | 00 00 01 00 00 06 f1 fe |able....|........|
|00002770| f2 ff 20 02 01 00 00 00 | d8 06 00 00 d8 06 00 00 |.. .....|........|
|00002780| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002790| 00 00 00 00 00 00 55 45 | 03 00 00 00 25 00 00 00 |......UE|....%...|
|000027a0| ed 05 00 00 00 00 00 00 | 6f 06 00 00 2a 00 00 00 |........|o...*...|
|000027b0| 1b 06 00 00 00 00 00 00 | 00 00 00 00 fc 03 00 03 |........|........|
|000027c0| 00 55 00 00 38 00 10 00 | 54 f7 00 00 10 fc f4 01 |.U..8...|T.......|
|000027d0| 00 f7 02 00 fd fe 0f 00 | 25 fc 43 f7 00 00 aa fd |........|%.C.....|
|000027e0| f9 05 31 00 fe 12 00 01 | 55 53 45 20 49 4e 20 26 |..1.....|USE IN &|
|000027f0| 63 41 6c 69 61 73 0a 04 | 00 1e fe 03 00 55 03 00 |cAlias..|.....U..|
|00002800| 06 00 43 41 4c 49 41 53 | 04 00 54 48 49 53 04 00 |..CALIAS|..THIS..|
|00002810| 4e 41 4d 45 f3 01 0f 00 | af f7 00 00 07 f7 01 00 |NAME....|........|
|00002820| 07 f7 02 00 fe 0d 00 18 | 48 f9 05 1c 00 f9 05 ec |........|H.......|
|00002830| 01 fe 12 00 0c fc f7 00 | 00 f9 04 0e 07 10 fd f9 |........|........|
|00002840| 05 c9 00 fe 9b 00 86 fc | 43 d9 7f 00 41 6e 20 69 |........|C...An i|
|00002850| 6e 76 61 6c 69 64 20 64 | 69 73 70 6c 61 79 20 63 |nvalid d|isplay c|
|00002860| 6f 6c 75 6d 6e 20 6f 72 | 20 72 65 74 75 72 6e 20 |olumn or| return |
|00002870| 63 6f 6c 75 6d 6e 20 68 | 61 73 20 62 65 65 6e 20 |column h|as been |
|00002880| 73 70 65 63 69 66 69 65 | 64 20 69 6e 20 74 68 65 |specifie|d in the|
|00002890| 20 27 64 69 73 70 6c 61 | 79 5f 63 6f 6c 75 6d 6e | 'displa|y_column|
|000028a0| 27 20 6f 72 20 27 72 65 | 74 75 72 6e 5f 63 6f 6c |' or 're|turn_col|
|000028b0| 75 6d 6e 27 20 70 72 6f | 70 65 72 74 69 65 73 20 |umn' pro|perties |
|000028c0| 28 63 6f 6d 62 6f 20 62 | 6f 78 20 f4 03 00 f7 04 |(combo b|ox .....|
|000028d0| 00 06 d9 02 00 29 2e 06 | f8 02 30 ea 78 fd fe 12 |.....)..|..0.x...|
|000028e0| 00 0c fc f7 00 00 f9 04 | 10 07 10 fd f9 05 46 01 |........|......F.|
|000028f0| fe 6b 00 86 fc 43 d9 4f | 00 41 6e 20 69 6e 76 61 |.k...C.O|.An inva|
|00002900| 6c 69 64 20 63 6f 6c 75 | 6d 6e 20 68 61 73 20 62 |lid colu|mn has b|
|00002910| 65 65 6e 20 73 70 65 63 | 69 66 69 65 64 20 69 6e |een spec|ified in|
|00002920| 20 74 68 65 20 27 6f 72 | 64 65 72 5f 63 6f 6c 75 | the 'or|der_colu|
|00002930| 6d 6e 27 20 70 72 6f 70 | 65 72 74 79 20 28 63 6f |mn' prop|erty (co|
|00002940| 6d 62 6f 20 62 6f 78 20 | f4 03 00 f7 04 00 06 d9 |mbo box |........|
|00002950| 02 00 29 2e 06 f8 02 30 | ea 78 fd fe 12 00 0c fc |..)....0|.x......|
|00002960| f7 00 00 f9 04 0a 07 10 | fd f9 05 d6 01 fe 7e 00 |........|......~.|
|00002970| 86 fc 43 d9 62 00 41 6e | 20 69 6e 76 61 6c 69 64 |..C.b.An| invalid|
|00002980| 20 74 61 62 6c 65 20 68 | 61 73 20 62 65 65 6e 20 | table h|as been |
|00002990| 73 70 65 63 69 66 69 65 | 64 20 69 6e 20 74 68 65 |specifie|d in the|
|000029a0| 20 27 64 69 73 70 6c 61 | 79 5f 63 6f 6c 75 6d 6e | 'displa|y_column|
|000029b0| 27 20 6f 72 20 27 6c 6f | 6f 6b 75 70 5f 74 61 62 |' or 'lo|okup_tab|
|000029c0| 6c 65 27 20 70 72 6f 70 | 65 72 74 79 20 28 63 6f |le' prop|erty (co|
|000029d0| 6d 62 6f 20 62 6f 78 20 | f4 03 00 f7 04 00 06 d9 |mbo box |........|
|000029e0| 02 00 29 2e 06 f8 02 30 | ea 78 fd fe 08 00 32 f9 |..)....0|.x....2.|
|000029f0| 05 ec 01 fe 0e 00 86 fc | 43 43 45 f8 02 30 ea 78 |........|CCE..0.x|
|00002a00| fd fe 04 00 1c fe 03 00 | 55 05 00 06 00 4e 45 52 |........|U....NER|
|00002a10| 52 4f 52 07 00 43 4d 45 | 54 48 4f 44 05 00 4e 4c |ROR..CME|THOD..NL|
|00002a20| 49 4e 45 04 00 54 48 49 | 53 04 00 4e 41 4d 45 d0 |INE..THI|S..NAME.|
|00002a30| 02 0b 00 54 f7 00 00 10 | fc 61 fd fe 0d 00 18 48 |...T....|.a.....H|
|00002a40| f9 05 18 00 f9 05 aa 01 | fe 12 00 0c fc 43 f4 01 |........|.....C..|
|00002a50| 00 f7 02 00 a1 fd f9 05 | 9c 00 fe 67 00 86 fc 43 |........|...g...C|
|00002a60| d9 4b 00 41 20 6c 6f 6f | 6b 75 70 20 74 61 62 6c |.K.A loo|kup tabl|
|00002a70| 65 20 6d 75 73 74 20 62 | 65 20 73 70 65 63 69 66 |e must b|e specif|
|00002a80| 69 65 64 20 69 6e 20 74 | 68 65 20 27 6c 6f 6f 6b |ied in t|he 'look|
|00002a90| 75 70 5f 74 61 62 6c 65 | 27 20 70 72 6f 70 65 72 |up_table|' proper|
|00002aa0| 74 79 20 28 63 6f 6d 62 | 6f 20 62 6f 78 20 f4 01 |ty (comb|o box ..|
|00002ab0| 00 f7 03 00 06 d9 02 00 | 29 2e 06 f8 02 30 ea 78 |........|)....0.x|
|00002ac0| fd fe 0b 00 54 f7 00 00 | 10 fc 2d fd fe 12 00 0c |....T...|..-.....|
|00002ad0| fc 43 f4 01 00 f7 04 00 | a1 fd f9 05 24 01 fe 6b |.C......|....$..k|
|00002ae0| 00 86 fc 43 d9 4f 00 41 | 20 64 69 73 70 6c 61 79 |...C.O.A| display|
|00002af0| 20 63 6f 6c 75 6d 6e 20 | 6d 75 73 74 20 62 65 20 | column |must be |
|00002b00| 73 70 65 63 69 66 69 65 | 64 20 69 6e 20 74 68 65 |specifie|d in the|
|00002b10| 20 27 64 69 73 70 6c 61 | 79 5f 63 6f 6c 75 6d 6e | 'displa|y_column|
|00002b20| 27 20 70 72 6f 70 65 72 | 74 79 20 28 63 6f 6d 62 |' proper|ty (comb|
|00002b30| 6f 20 62 6f 78 20 f4 01 | 00 f7 03 00 06 d9 02 00 |o box ..|........|
|00002b40| 29 2e 06 f8 02 30 ea 78 | fd fe 0b 00 54 f7 00 00 |)....0.x|....T...|
|00002b50| 10 fc 2d fd fe 12 00 0c | fc 43 f4 01 00 f7 05 00 |..-.....|.C......|
|00002b60| a1 fd f9 05 aa 01 fe 69 | 00 86 fc 43 d9 4d 00 41 |.......i|...C.M.A|
|00002b70| 20 72 65 74 75 72 6e 20 | 63 6f 6c 75 6d 6e 20 6d | return |column m|
|00002b80| 75 73 74 20 62 65 20 73 | 70 65 63 69 66 69 65 64 |ust be s|pecified|
|00002b90| 20 69 6e 20 74 68 65 20 | 27 72 65 74 75 72 6e 5f | in the |'return_|
|00002ba0| 63 6f 6c 75 6d 6e 27 20 | 70 72 6f 70 65 72 74 79 |column' |property|
|00002bb0| 20 28 63 6f 6d 62 6f 20 | 62 6f 78 20 f4 01 00 f7 | (combo |box ....|
|00002bc0| 03 00 06 d9 02 00 29 2e | 06 f8 02 30 ea 78 fd fe |......).|...0.x..|
|00002bd0| 0b 00 54 f7 00 00 10 fc | 2d fd fe 04 00 1c fe 0d |..T.....|-.......|
|00002be0| 00 25 fc f7 00 00 fd f9 | 05 bf 02 fe 13 00 25 fc |.%......|......%.|
|00002bf0| 43 f4 01 00 f7 06 00 a1 | 0a fd f9 05 33 02 fe 65 |C.......|....3..e|
|00002c00| 00 54 f7 07 00 10 fc d9 | 07 00 53 45 4c 45 43 54 |.T......|..SELECT|
|00002c10| 20 f4 01 00 f7 04 00 06 | d9 01 00 2c 06 f4 01 00 | .......|...,....|
|00002c20| f7 05 00 06 d9 06 00 20 | 46 52 4f 4d 20 06 f4 01 |....... |FROM ...|
|00002c30| 00 f7 02 00 06 d9 0a 00 | 20 4f 52 44 45 52 20 42 |........| ORDER B|
|00002c40| 59 20 06 f4 01 00 f7 06 | 00 06 d9 0d 00 20 49 4e |Y ......|..... IN|
|00002c50| 54 4f 20 43 55 52 53 4f | 52 20 06 f4 01 00 f7 03 |TO CURSO|R ......|
|00002c60| 00 06 fd fe 08 00 1b f9 | 05 8b 02 fe 50 00 54 f7 |........|....P.T.|
|00002c70| 07 00 10 fc d9 07 00 53 | 45 4c 45 43 54 20 f4 01 |.......S|ELECT ..|
|00002c80| 00 f7 04 00 06 d9 01 00 | 2c 06 f4 01 00 f7 05 00 |........|,.......|
|00002c90| 06 d9 06 00 20 46 52 4f | 4d 20 06 f4 01 00 f7 02 |.... FRO|M ......|
|00002ca0| 00 06 d9 0d 00 20 49 4e | 54 4f 20 43 55 52 53 4f |..... IN|TO CURSO|
|00002cb0| 52 20 06 f4 01 00 f7 03 | 00 06 fd fe 04 00 1e fe |R ......|........|
|00002cc0| 10 00 54 f4 01 00 f7 08 | 00 10 fc f8 01 03 fd fe |..T.....|........|
|00002cd0| 10 00 54 f4 01 00 f7 09 | 00 10 fc f7 07 00 fd fe |..T.....|........|
|00002ce0| 10 00 54 f4 01 00 f7 0a | 00 10 fc f8 01 02 fd fe |..T.....|........|
|00002cf0| 04 00 1e fe 0a 00 99 f4 | 01 00 f7 0b 00 fe 03 00 |........|........|
|00002d00| 55 0c 00 03 00 4c 4f 4b | 04 00 54 48 49 53 0c 00 |U....LOK|..THIS..|
|00002d10| 4c 4f 4f 4b 55 50 5f 54 | 41 42 4c 45 04 00 4e 41 |LOOKUP_T|ABLE..NA|
|00002d20| 4d 45 0e 00 44 49 53 50 | 4c 41 59 5f 43 4f 4c 55 |ME..DISP|LAY_COLU|
|00002d30| 4d 4e 0d 00 52 45 54 55 | 52 4e 5f 43 4f 4c 55 4d |MN..RETU|RN_COLUM|
|00002d40| 4e 0c 00 4f 52 44 45 52 | 5f 43 4f 4c 55 4d 4e 04 |N..ORDER|_COLUMN.|
|00002d50| 00 4e 53 51 4c 0d 00 52 | 4f 57 53 4f 55 52 43 45 |.NSQL..R|OWSOURCE|
|00002d60| 54 59 50 45 09 00 52 4f | 57 53 4f 55 52 43 45 0b |TYPE..RO|WSOURCE.|
|00002d70| 00 42 4f 55 4e 44 43 4f | 4c 55 4d 4e 07 00 52 45 |.BOUNDCO|LUMN..RE|
|00002d80| 46 52 45 53 48 07 00 44 | 65 73 74 72 6f 79 2c 00 |FRESH..D|estroy,.|
|00002d90| 00 00 00 00 ff ff 05 00 | 45 72 72 6f 72 7c 00 00 |........|Error|..|
|00002da0| 00 00 00 ff ff 04 00 49 | 6e 69 74 97 02 00 00 00 |.......I|nit.....|
|00002db0| 00 ff ff 31 00 01 01 f1 | 00 21 01 41 00 32 00 f1 |...1....|.!.A.2..|
|00002dc0| 00 d8 00 21 01 b1 09 21 | 01 b1 06 21 01 e1 07 81 |...!...!|...!....|
|00002dd0| 00 e1 00 41 00 32 00 b5 | 00 d1 00 21 01 71 06 b1 |...A.2..|...!.q..|
|00002de0| 00 21 01 b1 06 b1 00 21 | 01 91 06 b1 00 41 00 d2 |.!.....!|.....A..|
|00002df0| 00 31 01 51 06 81 00 01 | 05 41 00 01 01 01 01 01 |.1.Q....|.A......|
|00002e00| 01 41 00 a1 00 31 00 00 | 00 00 00 00 00 00 00 00 |.A...1..|........|
|00002e10| 00 00 00 00 00 00 00 01 | 00 00 00 13 00 00 00 53 |........|.......S|
|00002e20| 00 00 00 01 00 00 00 06 | 00 00 00 6f 00 00 00 45 |........|...o...E|
|00002e30| 03 00 00 07 00 00 00 12 | 00 00 00 60 03 00 00 c3 |........|...`....|
|00002e40| 07 00 00 1b 00 00 00 00 | 29 00 00 00 d8 06 00 00 |........|).......|
|00002e50| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002e60| 00 00 00 01 00 00 01 dc | 2a 68 61 6e 64 6c 65 72 |........|*handler|
|00002e70| 65 63 6f 72 64 20 63 6f | 6d 70 61 72 65 73 20 74 |ecord co|mpares t|
|00002e80| 68 65 20 63 75 72 72 65 | 6e 74 20 76 61 6c 75 65 |he curre|nt value|
|00002e90| 2c 20 6f 6c 64 20 76 61 | 6c 75 65 2c 20 61 6e 64 |, old va|lue, and|
|00002ea0| 20 6f 72 69 67 69 6e 61 | 6c 20 76 61 6c 75 65 20 | origina|l value |
|00002eb0| 6f 66 20 65 61 63 68 20 | 66 69 65 6c 64 2c 20 64 |of each |field, d|
|00002ec0| 69 73 70 6c 61 79 69 6e | 67 20 61 20 6d 65 73 73 |isplayin|g a mess|
|00002ed0| 61 67 65 62 6f 78 20 69 | 66 20 61 20 63 68 61 6e |agebox i|f a chan|
|00002ee0| 67 65 20 6f 72 20 63 6f | 6e 66 6c 69 63 74 20 69 |ge or co|nflict i|
|00002ef0| 73 20 64 65 74 65 63 74 | 65 64 2e 0d 0a 2a 73 74 |s detect|ed...*st|
|00002f00| 72 69 6e 67 20 72 65 74 | 75 72 6e 73 20 74 79 70 |ring ret|urns typ|
|00002f10| 65 20 27 63 27 20 65 71 | 75 69 76 61 6c 65 6e 74 |e 'c' eq|uivalent|
|00002f20| 20 6f 66 20 70 61 73 73 | 65 64 20 76 61 6c 75 65 | of pass|ed value|
|00002f30| 0d 0a 2a 76 65 72 69 66 | 79 63 68 61 6e 67 65 73 |..*verif|ychanges|
|00002f40| 20 50 72 6f 6d 70 74 73 | 20 61 20 75 73 65 72 20 | Prompts| a user |
|00002f50| 74 6f 20 73 61 76 65 20 | 61 6c 6c 20 63 68 61 6e |to save |all chan|
|00002f60| 67 65 73 20 6d 61 64 65 | 20 74 6f 20 61 20 74 61 |ges made| to a ta|
|00002f70| 62 6c 65 20 6f 72 20 72 | 65 63 6f 72 64 2e 0d 0a |ble or r|ecord...|
|00002f80| 2a 76 65 72 69 66 79 65 | 61 63 68 63 68 61 6e 67 |*verifye|achchang|
|00002f90| 65 20 50 72 6f 6d 70 74 | 73 20 61 20 75 73 65 72 |e Prompt|s a user|
|00002fa0| 20 74 6f 20 63 6f 6e 66 | 69 72 6d 20 65 61 63 68 | to conf|irm each|
|00002fb0| 20 63 68 61 6e 67 65 20 | 68 65 20 6f 72 20 73 68 | change |he or sh|
|00002fc0| 65 20 6d 61 64 65 2e 0d | 0a 2a 63 68 65 63 6b 63 |e made..|.*checkc|
|00002fd0| 6f 6e 66 6c 69 63 74 73 | 20 4e 6f 74 69 66 69 65 |onflicts| Notifie|
|00002fe0| 73 20 61 20 75 73 65 72 | 20 69 66 20 73 6f 6d 65 |s a user| if some|
|00002ff0| 6f 6e 65 20 65 6c 73 65 | 20 68 61 73 20 63 68 61 |one else| has cha|
|00003000| 6e 67 65 64 20 74 68 65 | 20 64 61 74 61 20 69 6e |nged the| data in|
|00003010| 20 74 68 65 20 74 61 62 | 6c 65 20 61 66 74 65 72 | the tab|le after|
|00003020| 20 68 65 20 6f 72 20 73 | 68 65 20 62 65 67 61 6e | he or s|he began|
|00003030| 20 65 64 69 74 69 6e 67 | 20 61 20 72 65 63 6f 72 | editing| a recor|
|00003040| 64 2e 0d 0a 00 00 00 01 | 00 00 21 d3 50 52 4f 43 |d.......|..!.PROC|
|00003050| 45 44 55 52 45 20 68 61 | 6e 64 6c 65 72 65 63 6f |EDURE ha|ndlereco|
|00003060| 72 64 0d 0a 2a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |rd..*---|--------|
|00003070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000030a0| 2d 2d 2d 2d 2a 0d 0a 2a | 20 20 54 68 69 73 20 6d |----*..*| This m|
|000030b0| 65 74 68 6f 64 20 69 73 | 20 63 61 6c 6c 65 64 20 |ethod is| called |
|000030c0| 66 72 6f 6d 20 74 68 65 | 20 43 68 65 63 6b 43 6f |from the| CheckCo|
|000030d0| 6e 66 6c 69 63 74 73 20 | 6d 65 74 68 6f 64 20 61 |nflicts |method a|
|000030e0| 6e 64 20 74 68 65 20 0d | 0a 2a 20 20 56 65 72 69 |nd the .|.* Veri|
|000030f0| 66 79 45 61 63 68 43 68 | 61 6e 67 65 20 6d 65 74 |fyEachCh|ange met|
|00003100| 68 6f 64 2e 20 20 49 74 | 20 6c 6f 6f 70 73 20 74 |hod. It| loops t|
|00003110| 68 72 6f 75 67 68 20 65 | 61 63 68 20 66 69 65 6c |hrough e|ach fiel|
|00003120| 64 20 69 6e 20 74 68 65 | 0d 0a 2a 20 20 63 75 72 |d in the|..* cur|
|00003130| 72 65 6e 74 20 72 65 63 | 6f 72 64 20 61 6e 64 20 |rent rec|ord and |
|00003140| 63 6f 6d 70 61 72 65 73 | 20 74 68 65 20 63 75 72 |compares| the cur|
|00003150| 72 65 6e 74 20 76 61 6c | 75 65 20 77 69 74 68 20 |rent val|ue with |
|00003160| 74 68 65 20 76 61 6c 75 | 65 0d 0a 2a 20 20 73 74 |the valu|e..* st|
|00003170| 6f 72 65 64 20 69 6e 20 | 74 68 65 20 74 61 62 6c |ored in |the tabl|
|00003180| 65 2e 20 49 66 20 61 20 | 76 61 6c 75 65 20 6f 66 |e. If a |value of|
|00003190| 20 31 20 69 73 20 70 61 | 73 73 65 64 20 74 6f 20 | 1 is pa|ssed to |
|000031a0| 74 68 69 73 20 6d 65 74 | 68 6f 64 2c 0d 0a 2a 20 |this met|hod,..* |
|000031b0| 20 74 68 65 20 6d 65 74 | 68 6f 64 20 61 6c 73 6f | the met|hod also|
|000031c0| 20 63 6f 6d 70 61 72 65 | 73 20 74 68 65 20 63 75 | compare|s the cu|
|000031d0| 72 72 65 6e 74 20 76 61 | 6c 75 65 20 77 69 74 68 |rrent va|lue with|
|000031e0| 20 74 68 65 20 76 61 6c | 75 65 20 69 6e 0d 0a 2a | the val|ue in..*|
|000031f0| 20 20 74 68 65 20 66 69 | 65 6c 64 20 62 65 66 6f | the fi|eld befo|
|00003200| 72 65 20 75 73 65 72 20 | 6d 61 64 65 20 61 6e 79 |re user |made any|
|00003210| 20 65 64 69 74 73 2e 0d | 0a 2a 0d 0a 2a 20 20 52 | edits..|.*..* R|
|00003220| 45 54 55 52 4e 53 20 4e | 55 4d 45 52 49 43 20 56 |ETURNS N|UMERIC V|
|00003230| 41 4c 55 45 53 3a 0d 0a | 2a 20 20 20 20 30 20 2d |ALUES:..|* 0 -|
|00003240| 2d 20 4e 6f 20 43 68 61 | 6e 67 65 20 4d 61 64 65 |- No Cha|nge Made|
|00003250| 20 74 6f 20 74 68 65 20 | 43 75 72 72 65 6e 74 20 | to the |Current |
|00003260| 56 61 6c 75 65 0d 0a 2a | 20 20 20 20 31 20 2d 2d |Value..*| 1 --|
|00003270| 20 53 75 63 63 65 73 73 | 66 75 6c 6c 79 20 4d 61 | Success|fully Ma|
|00003280| 64 65 20 55 73 65 72 2d | 53 70 65 63 69 66 69 65 |de User-|Specifie|
|00003290| 64 20 43 68 61 6e 67 65 | 0d 0a 2a 09 20 32 20 2d |d Change|..*. 2 -|
|000032a0| 2d 20 55 6e 61 62 6c 65 | 20 74 6f 20 4d 61 6b 65 |- Unable| to Make|
|000032b0| 20 55 73 65 72 2d 53 70 | 65 63 69 66 65 64 20 43 | User-Sp|ecifed C|
|000032c0| 68 61 6e 67 65 0d 0a 2a | 2d 2d 2d 2d 2d 2d 2d 2d |hange..*|--------|
|000032d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000032f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003300| 2d 2d 2d 2d 2d 2d 2d 2a | 0d 0a 0d 0a 4c 50 41 52 |-------*|....LPAR|
|00003310| 41 4d 45 54 45 52 53 20 | 6c 6e 53 63 6f 70 65 0d |AMETERS |lnScope.|
|00003320| 0a 0d 0a 2a 2d 2d 56 61 | 6c 69 64 20 76 61 6c 75 |...*--Va|lid valu|
|00003330| 65 73 20 66 6f 72 20 6c | 6e 53 63 6f 70 65 3a 0d |es for l|nScope:.|
|00003340| 0a 2a 20 09 30 20 2d 20 | 4f 6e 6c 79 20 6d 61 6e |.* .0 - |Only man|
|00003350| 61 67 65 20 63 6f 6e 66 | 6c 69 63 74 73 20 20 20 |age conf|licts |
|00003360| 26 26 20 64 65 66 61 75 | 6c 74 0d 0a 2a 20 20 20 |&& defau|lt..* |
|00003370| 31 20 2d 20 41 6c 73 6f | 20 70 72 6f 6d 70 74 20 |1 - Also| prompt |
|00003380| 66 6f 72 20 63 68 61 6e | 67 65 64 20 76 61 6c 75 |for chan|ged valu|
|00003390| 65 73 0d 0a 0d 0a 2a 20 | 56 65 72 69 66 79 20 70 |es....* |Verify p|
|000033a0| 61 72 61 6d 65 74 65 72 | 0d 0a 49 46 20 54 59 50 |arameter|..IF TYP|
|000033b0| 45 28 22 6d 2e 6c 6e 53 | 63 6f 70 65 22 29 20 21 |E("m.lnS|cope") !|
|000033c0| 3d 20 22 4e 22 0d 0a 09 | 6d 2e 6c 6e 53 63 6f 70 |= "N"...|m.lnScop|
|000033d0| 65 20 3d 20 30 20 0d 0a | 45 4e 44 49 46 0d 0a 49 |e = 0 ..|ENDIF..I|
|000033e0| 46 20 21 42 45 54 57 45 | 45 4e 28 6d 2e 6c 6e 53 |F !BETWE|EN(m.lnS|
|000033f0| 63 6f 70 65 2c 20 30 2c | 20 31 29 0d 0a 09 23 64 |cope, 0,| 1)...#d|
|00003400| 65 66 69 6e 65 20 57 49 | 4e 44 4d 53 47 5f 4c 4f |efine WI|NDMSG_LO|
|00003410| 43 20 22 49 6e 76 61 6c | 69 64 20 76 61 6c 75 65 |C "Inval|id value|
|00003420| 20 70 61 73 73 65 64 20 | 74 6f 20 63 6f 6e 66 6c | passed |to confl|
|00003430| 69 63 74 6d 61 6e 61 67 | 65 72 2e 68 61 6e 64 6c |ictmanag|er.handl|
|00003440| 65 72 65 63 6f 72 64 22 | 0d 0a 09 57 41 49 54 20 |erecord"|...WAIT |
|00003450| 57 49 4e 44 4f 57 20 57 | 49 4e 44 4d 53 47 5f 4c |WINDOW W|INDMSG_L|
|00003460| 4f 43 0d 0a 45 4e 44 49 | 46 0d 0a 0d 0a 2a 20 44 |OC..ENDI|F....* D|
|00003470| 65 63 6c 61 72 65 20 63 | 6f 6e 73 74 61 6e 74 73 |eclare c|onstants|
|00003480| 20 26 20 76 61 72 69 61 | 62 6c 65 73 0d 0a 23 64 | & varia|bles..#d|
|00003490| 65 66 69 6e 65 20 43 52 | 5f 4c 4f 43 20 43 48 52 |efine CR|_LOC CHR|
|000034a0| 28 31 33 29 0d 0a 23 64 | 65 66 69 6e 65 20 53 41 |(13)..#d|efine SA|
|000034b0| 56 45 5f 4c 4f 43 20 22 | 44 6f 20 79 6f 75 20 77 |VE_LOC "|Do you w|
|000034c0| 61 6e 74 20 74 6f 20 6f | 76 65 72 77 72 69 74 65 |ant to o|verwrite|
|000034d0| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 76 61 6c | the cur|rent val|
|000034e0| 75 65 20 77 69 74 68 20 | 79 6f 75 72 20 63 68 61 |ue with |your cha|
|000034f0| 6e 67 65 3f 22 20 2b 20 | 43 52 5f 4c 4f 43 20 2b |nge?" + |CR_LOC +|
|00003500| 20 22 28 43 68 6f 6f 73 | 65 20 27 43 61 6e 63 65 | "(Choos|e 'Cance|
|00003510| 6c 27 20 74 6f 20 72 65 | 73 74 6f 72 65 20 74 68 |l' to re|store th|
|00003520| 65 20 6f 72 69 67 69 6e | 61 6c 20 76 61 6c 75 65 |e origin|al value|
|00003530| 2e 29 22 0d 0a 23 64 65 | 66 69 6e 65 20 43 4f 4e |.)"..#de|fine CON|
|00003540| 46 4c 49 43 54 5f 4c 4f | 43 20 22 44 61 74 61 20 |FLICT_LO|C "Data |
|00003550| 43 6f 6e 66 6c 69 63 74 | 22 0d 0a 23 64 65 66 69 |Conflict|"..#defi|
|00003560| 6e 65 20 56 45 52 49 46 | 59 5f 4c 4f 43 20 22 56 |ne VERIF|Y_LOC "V|
|00003570| 65 72 69 66 79 20 43 68 | 61 6e 67 65 73 22 0d 0a |erify Ch|anges"..|
|00003580| 23 64 65 66 69 6e 65 20 | 4f 52 47 5f 4c 4f 43 20 |#define |ORG_LOC |
|00003590| 22 4f 72 69 67 69 6e 61 | 6c 20 56 61 6c 75 65 3a |"Origina|l Value:|
|000035a0| 20 22 0d 0a 23 64 65 66 | 69 6e 65 20 43 55 52 5f | "..#def|ine CUR_|
|000035b0| 4c 4f 43 20 22 43 75 72 | 72 65 6e 74 20 56 61 6c |LOC "Cur|rent Val|
|000035c0| 75 65 3a 20 22 20 0d 0a | 23 64 65 66 69 6e 65 20 |ue: " ..|#define |
|000035d0| 43 48 47 5f 4c 4f 43 20 | 22 59 6f 75 72 20 63 68 |CHG_LOC |"Your ch|
|000035e0| 61 6e 67 65 3a 20 22 0d | 0a 23 64 65 66 69 6e 65 |ange: ".|.#define|
|000035f0| 20 4d 45 4d 4f 5f 4c 4f | 43 20 22 20 69 73 20 61 | MEMO_LO|C " is a|
|00003600| 20 4d 65 6d 6f 20 66 69 | 65 6c 64 2e 22 0d 0a 23 | Memo fi|eld."..#|
|00003610| 64 65 66 69 6e 65 20 46 | 49 45 4c 44 5f 4c 4f 43 |define F|IELD_LOC|
|00003620| 20 22 46 69 65 6c 64 3a | 20 22 0d 0a 23 64 65 66 | "Field:| "..#def|
|00003630| 69 6e 65 20 52 45 43 4f | 52 44 5f 4c 4f 43 20 22 |ine RECO|RD_LOC "|
|00003640| 52 65 63 6f 72 64 20 4e | 75 6d 62 65 72 3a 20 22 |Record N|umber: "|
|00003650| 0d 0a 23 64 65 66 69 6e | 65 20 56 41 4c 43 48 47 |..#defin|e VALCHG|
|00003660| 31 5f 4c 4f 43 20 22 41 | 20 76 61 6c 75 65 20 68 |1_LOC "A| value h|
|00003670| 61 73 20 62 65 65 6e 20 | 63 68 61 6e 67 65 64 20 |as been |changed |
|00003680| 62 79 20 61 6e 6f 74 68 | 65 72 20 75 73 65 72 2e |by anoth|er user.|
|00003690| 22 0d 0a 23 64 65 66 69 | 6e 65 20 56 41 4c 43 48 |"..#defi|ne VALCH|
|000036a0| 47 32 5f 4c 4f 43 20 22 | 41 20 76 61 6c 75 65 20 |G2_LOC "|A value |
|000036b0| 68 61 73 20 62 65 65 6e | 20 63 68 61 6e 67 65 64 |has been| changed|
|000036c0| 2e 22 0d 0a 0d 0a 4c 4f | 43 41 4c 20 6c 6e 43 68 |."....LO|CAL lnCh|
|000036d0| 6f 69 63 65 2c 20 6c 6e | 46 69 65 6c 64 2c 20 6c |oice, ln|Field, l|
|000036e0| 63 46 69 65 6c 64 2c 20 | 6c 75 4f 6c 64 56 61 6c |cField, |luOldVal|
|000036f0| 2c 20 6c 75 43 75 72 56 | 61 6c 2c 20 6c 75 46 69 |, luCurV|al, luFi|
|00003700| 65 6c 64 2c 20 6c 6c 4d | 61 64 65 43 68 61 6e 67 |eld, llM|adeChang|
|00003710| 65 2c 20 6c 6c 53 75 63 | 63 65 73 73 0d 0a 6d 2e |e, llSuc|cess..m.|
|00003720| 6c 6c 4d 61 64 65 43 68 | 61 6e 67 65 20 3d 20 2e |llMadeCh|ange = .|
|00003730| 46 2e 0d 0a 6d 2e 6c 6c | 53 75 63 63 65 73 73 20 |F...m.ll|Success |
|00003740| 3d 20 2e 54 2e 0d 0a 0d | 0a 2a 20 72 65 66 72 65 |= .T....|.* refre|
|00003750| 73 68 20 63 75 72 72 65 | 6e 74 20 72 65 63 6f 72 |sh curre|nt recor|
|00003760| 64 20 69 6e 20 76 69 65 | 77 73 20 62 65 66 6f 72 |d in vie|ws befor|
|00003770| 65 20 63 68 65 63 6b 69 | 6e 67 20 66 6f 72 20 63 |e checki|ng for c|
|00003780| 6f 6e 66 6c 69 63 74 73 | 0d 0a 49 46 20 43 55 52 |onflicts|..IF CUR|
|00003790| 53 4f 52 47 45 54 50 52 | 4f 50 28 27 53 6f 75 72 |SORGETPR|OP('Sour|
|000037a0| 63 65 54 79 70 65 27 29 | 20 21 3d 20 33 20 26 26 |ceType')| != 3 &&|
|000037b0| 20 6e 6f 74 20 61 20 6c | 6f 63 61 6c 20 74 61 62 | not a l|ocal tab|
|000037c0| 6c 65 0d 0a 09 3d 52 45 | 46 52 45 53 48 28 29 0d |le...=RE|FRESH().|
|000037d0| 0a 45 4e 44 49 46 0d 0a | 0d 0a 2a 20 43 68 65 63 |.ENDIF..|..* Chec|
|000037e0| 6b 20 65 61 63 68 20 66 | 69 65 6c 64 20 69 6e 20 |k each f|ield in |
|000037f0| 74 68 65 20 72 65 63 6f | 72 64 20 66 6f 72 20 63 |the reco|rd for c|
|00003800| 6f 6e 66 6c 69 63 74 20 | 6f 72 20 76 61 6c 75 65 |onflict |or value|
|00003810| 20 63 68 61 6e 67 65 0d | 0a 46 4f 52 20 6d 2e 6c | change.|.FOR m.l|
|00003820| 6e 46 69 65 6c 64 20 3d | 20 31 20 74 6f 20 46 43 |nField =| 1 to FC|
|00003830| 4f 55 4e 54 28 29 0d 0a | 09 6d 2e 6c 6e 43 68 6f |OUNT()..|.m.lnCho|
|00003840| 69 63 65 20 3d 20 30 0d | 0a 09 0d 0a 09 6d 2e 6c |ice = 0.|.....m.l|
|00003850| 63 46 69 65 6c 64 20 3d | 20 46 49 45 4c 44 28 6d |cField =| FIELD(m|
|00003860| 2e 6c 6e 46 69 65 6c 64 | 29 0d 0a 09 49 46 20 54 |.lnField|)...IF T|
|00003870| 59 50 45 28 6d 2e 6c 63 | 46 69 65 6c 64 29 20 3d |YPE(m.lc|Field) =|
|00003880| 20 22 47 22 0d 0a 09 09 | 4c 4f 4f 50 20 26 26 20 | "G"....|LOOP && |
|00003890| 43 61 6e 27 74 20 63 68 | 65 63 6b 20 67 65 6e 65 |Can't ch|eck gene|
|000038a0| 72 61 6c 20 66 69 65 6c | 64 73 0d 0a 09 45 4e 44 |ral fiel|ds...END|
|000038b0| 49 46 0d 0a 09 6d 2e 6c | 75 4f 6c 64 56 61 6c 20 |IF...m.l|uOldVal |
|000038c0| 3d 20 4f 4c 44 56 41 4c | 28 6d 2e 6c 63 46 69 65 |= OLDVAL|(m.lcFie|
|000038d0| 6c 64 29 0d 0a 09 6d 2e | 6c 75 43 75 72 56 61 6c |ld)...m.|luCurVal|
|000038e0| 20 3d 20 43 55 52 56 41 | 4c 28 6d 2e 6c 63 46 69 | = CURVA|L(m.lcFi|
|000038f0| 65 6c 64 29 0d 0a 09 0d | 0a 09 44 4f 20 43 41 53 |eld)....|..DO CAS|
|00003900| 45 0d 0a 09 09 2a 20 2d | 2d 2d 2d 2d 3c 20 63 68 |E....* -|----< ch|
|00003910| 65 63 6b 20 66 6f 72 20 | 63 6f 6e 66 6c 69 63 74 |eck for |conflict|
|00003920| 73 20 6f 6e 6c 79 20 3e | 2d 2d 2d 2d 2d 2d 2d 2d |s only >|--------|
|00003930| 0d 0a 09 09 43 41 53 45 | 20 6d 2e 6c 6e 53 63 6f |....CASE| m.lnSco|
|00003940| 70 65 20 3d 20 30 0d 0a | 09 09 09 49 46 20 6d 2e |pe = 0..|...IF m.|
|00003950| 6c 75 4f 6c 64 56 61 6c | 20 21 3d 20 6d 2e 6c 75 |luOldVal| != m.lu|
|00003960| 43 75 72 56 61 6c 0d 0a | 09 09 09 09 6d 2e 6c 6c |CurVal..|....m.ll|
|00003970| 4d 61 64 65 43 68 61 6e | 67 65 20 3d 20 2e 54 2e |MadeChan|ge = .T.|
|00003980| 20 20 0d 0a 09 09 09 09 | 6d 2e 6c 6e 43 68 6f 69 | ......|m.lnChoi|
|00003990| 63 65 20 3d 20 4d 45 53 | 53 41 47 45 42 4f 58 28 |ce = MES|SAGEBOX(|
|000039a0| 56 41 4c 43 48 47 31 5f | 4c 4f 43 20 2b 20 43 52 |VALCHG1_|LOC + CR|
|000039b0| 5f 4c 4f 43 20 2b 20 46 | 49 45 4c 44 5f 4c 4f 43 |_LOC + F|IELD_LOC|
|000039c0| 20 2b 20 6c 63 46 69 65 | 6c 64 20 2b 20 43 52 5f | + lcFie|ld + CR_|
|000039d0| 4c 4f 43 20 2b 20 3b 0d | 0a 09 09 09 09 52 45 43 |LOC + ;.|.....REC|
|000039e0| 4f 52 44 5f 4c 4f 43 20 | 2b 20 41 4c 4c 54 52 49 |ORD_LOC |+ ALLTRI|
|000039f0| 4d 28 53 54 52 28 52 45 | 43 4e 4f 28 29 29 29 20 |M(STR(RE|CNO())) |
|00003a00| 2b 20 3b 0d 0a 09 09 09 | 09 09 49 49 46 28 54 59 |+ ;.....|..IIF(TY|
|00003a10| 50 45 28 22 6d 2e 6c 63 | 46 69 65 6c 64 22 29 20 |PE("m.lc|Field") |
|00003a20| 21 3d 20 22 4d 22 2c 20 | 43 52 5f 4c 4f 43 20 2b |!= "M", |CR_LOC +|
|00003a30| 20 43 52 5f 4c 4f 43 20 | 2b 20 4f 52 47 5f 4c 4f | CR_LOC |+ ORG_LO|
|00003a40| 43 20 2b 20 54 48 49 53 | 2e 53 74 72 69 6e 67 28 |C + THIS|.String(|
|00003a50| 6d 2e 6c 75 4f 6c 64 56 | 61 6c 29 20 2b 20 3b 0d |m.luOldV|al) + ;.|
|00003a60| 0a 09 09 09 09 09 43 52 | 5f 4c 4f 43 20 2b 20 43 |......CR|_LOC + C|
|00003a70| 55 52 5f 4c 4f 43 20 2b | 20 54 48 49 53 2e 53 74 |UR_LOC +| THIS.St|
|00003a80| 72 69 6e 67 28 6d 2e 6c | 75 43 75 72 56 61 6c 29 |ring(m.l|uCurVal)|
|00003a90| 20 2b 20 3b 0d 0a 09 09 | 09 09 09 43 52 5f 4c 4f | + ;....|...CR_LO|
|00003aa0| 43 20 2b 20 43 48 47 5f | 4c 4f 43 20 2b 20 54 48 |C + CHG_|LOC + TH|
|00003ab0| 49 53 2e 53 74 72 69 6e | 67 28 45 56 41 4c 28 6d |IS.Strin|g(EVAL(m|
|00003ac0| 2e 6c 63 46 69 65 6c 64 | 29 29 2c 20 43 52 5f 4c |.lcField|)), CR_L|
|00003ad0| 4f 43 20 2b 20 43 52 5f | 4c 4f 43 20 2b 20 6d 2e |OC + CR_|LOC + m.|
|00003ae0| 6c 63 46 69 65 6c 64 20 | 2b 20 4d 45 4d 4f 5f 4c |lcField |+ MEMO_L|
|00003af0| 4f 43 29 20 2b 20 3b 0d | 0a 09 09 09 09 09 43 52 |OC) + ;.|......CR|
|00003b00| 5f 4c 4f 43 20 2b 20 43 | 52 5f 4c 4f 43 20 2b 20 |_LOC + C|R_LOC + |
|00003b10| 53 41 56 45 5f 4c 4f 43 | 2c 20 2b 20 33 2b 34 38 |SAVE_LOC|, + 3+48|
|00003b20| 2b 30 2c 20 43 4f 4e 46 | 4c 49 43 54 5f 4c 4f 43 |+0, CONF|LICT_LOC|
|00003b30| 29 09 09 09 09 09 0d 0a | 09 09 09 45 4e 44 49 46 |).......|...ENDIF|
|00003b40| 0d 0a 09 09 2a 20 2d 2d | 2d 2d 2d 3c 20 63 68 65 |....* --|---< che|
|00003b50| 63 6b 20 66 6f 72 20 63 | 6f 6e 66 6c 69 63 74 73 |ck for c|onflicts|
|00003b60| 20 61 6e 64 20 76 65 72 | 69 66 79 20 61 6c 6c 20 | and ver|ify all |
|00003b70| 63 68 61 6e 67 65 73 20 | 3e 2d 2d 2d 2d 2d 2d 2d |changes |>-------|
|00003b80| 2d 0d 0a 09 09 43 41 53 | 45 20 6d 2e 6c 6e 53 63 |-....CAS|E m.lnSc|
|00003b90| 6f 70 65 20 3d 20 31 20 | 26 26 20 56 65 72 69 66 |ope = 1 |&& Verif|
|00003ba0| 79 20 61 6c 6c 20 63 68 | 61 6e 67 65 73 0d 0a 09 |y all ch|anges...|
|00003bb0| 09 09 6d 2e 6c 75 46 69 | 65 6c 64 20 3d 20 45 56 |..m.luFi|eld = EV|
|00003bc0| 41 4c 28 6d 2e 6c 63 46 | 69 65 6c 64 29 0d 0a 09 |AL(m.lcF|ield)...|
|00003bd0| 09 09 49 46 20 6d 2e 6c | 75 4f 6c 64 56 61 6c 20 |..IF m.l|uOldVal |
|00003be0| 21 3d 20 6d 2e 6c 75 46 | 69 65 6c 64 20 4f 52 20 |!= m.luF|ield OR |
|00003bf0| 6d 2e 6c 75 43 75 72 56 | 61 6c 20 21 3d 20 6d 2e |m.luCurV|al != m.|
|00003c00| 6c 75 46 69 65 6c 64 0d | 0a 09 09 09 09 6d 2e 6c |luField.|.....m.l|
|00003c10| 6c 4d 61 64 65 43 68 61 | 6e 67 65 20 3d 20 2e 54 |lMadeCha|nge = .T|
|00003c20| 2e 20 20 0d 0a 09 09 09 | 09 6d 2e 6c 6e 43 68 6f |. .....|.m.lnCho|
|00003c30| 69 63 65 20 3d 20 4d 45 | 53 53 41 47 45 42 4f 58 |ice = ME|SSAGEBOX|
|00003c40| 28 56 41 4c 43 48 47 32 | 5f 4c 4f 43 20 2b 20 43 |(VALCHG2|_LOC + C|
|00003c50| 52 5f 4c 4f 43 20 2b 20 | 46 49 45 4c 44 5f 4c 4f |R_LOC + |FIELD_LO|
|00003c60| 43 20 2b 20 6d 2e 6c 63 | 46 69 65 6c 64 20 2b 20 |C + m.lc|Field + |
|00003c70| 43 52 5f 4c 4f 43 20 2b | 20 3b 0d 0a 09 09 09 09 |CR_LOC +| ;......|
|00003c80| 52 45 43 4f 52 44 5f 4c | 4f 43 20 2b 20 41 4c 4c |RECORD_L|OC + ALL|
|00003c90| 54 52 49 4d 28 53 54 52 | 28 52 45 43 4e 4f 28 29 |TRIM(STR|(RECNO()|
|00003ca0| 29 29 20 2b 20 3b 0d 0a | 09 09 09 09 09 49 49 46 |)) + ;..|.....IIF|
|00003cb0| 28 54 59 50 45 28 22 6d | 2e 6c 63 46 69 65 6c 64 |(TYPE("m|.lcField|
|00003cc0| 22 29 20 21 3d 20 22 4d | 22 2c 20 43 52 5f 4c 4f |") != "M|", CR_LO|
|00003cd0| 43 20 2b 20 43 52 5f 4c | 4f 43 20 2b 20 4f 52 47 |C + CR_L|OC + ORG|
|00003ce0| 5f 4c 4f 43 20 2b 20 54 | 48 49 53 2e 53 74 72 69 |_LOC + T|HIS.Stri|
|00003cf0| 6e 67 28 6d 2e 6c 75 4f | 6c 64 56 61 6c 29 20 2b |ng(m.luO|ldVal) +|
|00003d00| 20 3b 0d 0a 09 09 09 09 | 09 43 52 5f 4c 4f 43 20 | ;......|.CR_LOC |
|00003d10| 2b 20 43 55 52 5f 4c 4f | 43 20 2b 20 54 48 49 53 |+ CUR_LO|C + THIS|
|00003d20| 2e 53 74 72 69 6e 67 28 | 6d 2e 6c 75 43 75 72 56 |.String(|m.luCurV|
|00003d30| 61 6c 29 20 2b 20 3b 0d | 0a 09 09 09 09 09 43 52 |al) + ;.|......CR|
|00003d40| 5f 4c 4f 43 20 2b 20 43 | 48 47 5f 4c 4f 43 20 2b |_LOC + C|HG_LOC +|
|00003d50| 20 54 48 49 53 2e 53 74 | 72 69 6e 67 28 45 56 41 | THIS.St|ring(EVA|
|00003d60| 4c 28 6d 2e 6c 63 46 69 | 65 6c 64 29 29 2c 20 43 |L(m.lcFi|eld)), C|
|00003d70| 52 5f 4c 4f 43 20 20 2b | 20 43 52 5f 4c 4f 43 20 |R_LOC +| CR_LOC |
|00003d80| 2b 20 6d 2e 6c 63 46 69 | 65 6c 64 20 2b 20 4d 45 |+ m.lcFi|eld + ME|
|00003d90| 4d 4f 5f 4c 4f 43 29 20 | 2b 20 3b 0d 0a 09 09 09 |MO_LOC) |+ ;.....|
|00003da0| 09 43 52 5f 4c 4f 43 20 | 2b 20 43 52 5f 4c 4f 43 |.CR_LOC |+ CR_LOC|
|00003db0| 20 2b 20 53 41 56 45 5f | 4c 4f 43 2c 20 2b 20 33 | + SAVE_|LOC, + 3|
|00003dc0| 2b 34 38 2b 30 2c 20 56 | 45 52 49 46 59 5f 4c 4f |+48+0, V|ERIFY_LO|
|00003dd0| 43 29 0d 0a 09 09 09 45 | 4e 44 49 46 0d 0a 09 45 |C).....E|NDIF...E|
|00003de0| 4e 44 43 41 53 45 0d 0a | 09 44 4f 20 43 41 53 45 |NDCASE..|.DO CASE|
|00003df0| 0d 0a 09 43 41 53 45 20 | 6d 2e 6c 6e 43 68 6f 69 |...CASE |m.lnChoi|
|00003e00| 63 65 20 3d 20 37 20 26 | 26 20 4e 6f 2c 20 64 6f |ce = 7 &|& No, do|
|00003e10| 6e 27 74 20 73 61 76 65 | 20 63 68 61 6e 67 65 73 |n't save| changes|
|00003e20| 0d 0a 09 09 52 45 50 4c | 41 43 45 20 28 6d 2e 6c |....REPL|ACE (m.l|
|00003e30| 63 46 69 65 6c 64 29 20 | 57 49 54 48 20 6d 2e 6c |cField) |WITH m.l|
|00003e40| 75 43 75 72 56 61 6c 0d | 0a 09 43 41 53 45 20 6d |uCurVal.|..CASE m|
|00003e50| 2e 6c 6e 43 68 6f 69 63 | 65 20 3d 20 32 20 26 26 |.lnChoic|e = 2 &&|
|00003e60| 20 43 61 6e 63 65 6c 2c | 20 72 65 73 74 6f 72 65 | Cancel,| restore|
|00003e70| 20 6f 72 69 67 69 6e 61 | 6c 20 76 61 6c 75 65 0d | origina|l value.|
|00003e80| 0a 09 09 52 45 50 4c 41 | 43 45 20 28 6d 2e 6c 63 |...REPLA|CE (m.lc|
|00003e90| 46 69 65 6c 64 29 20 57 | 49 54 48 20 6d 2e 6c 75 |Field) W|ITH m.lu|
|00003ea0| 4f 6c 64 56 61 6c 0d 0a | 09 45 4e 44 43 41 53 45 |OldVal..|.ENDCASE|
|00003eb0| 0d 0a 45 4e 44 46 4f 52 | 0d 0a 49 46 20 6d 2e 6c |..ENDFOR|..IF m.l|
|00003ec0| 6c 4d 61 64 65 43 68 61 | 6e 67 65 0d 0a 09 6d 2e |lMadeCha|nge...m.|
|00003ed0| 6c 6c 53 75 63 63 65 73 | 73 20 3d 20 54 41 42 4c |llSucces|s = TABL|
|00003ee0| 45 55 50 44 41 54 45 28 | 2e 46 2e 2c 20 2e 54 2e |EUPDATE(|.F., .T.|
|00003ef0| 29 0d 0a 09 52 45 54 55 | 52 4e 20 49 49 46 28 6d |)...RETU|RN IIF(m|
|00003f00| 2e 6c 6c 53 75 63 63 65 | 73 73 2c 20 31 2c 20 32 |.llSucce|ss, 1, 2|
|00003f10| 29 0d 0a 45 4c 53 45 0d | 0a 09 52 45 54 55 52 4e |)..ELSE.|..RETURN|
|00003f20| 20 30 20 0d 0a 45 4e 44 | 49 46 0d 0a 0d 0a 45 4e | 0 ..END|IF....EN|
|00003f30| 44 50 52 4f 43 0d 0a 50 | 52 4f 43 45 44 55 52 45 |DPROC..P|ROCEDURE|
|00003f40| 20 73 74 72 69 6e 67 0d | 0a 2a 2d 2d 2d 2d 2d 2d | string.|.*------|
|00003f50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2a 0d 0a 2a 20 20 54 |--------|-*..* T|
|00003f90| 68 69 73 20 6d 65 74 68 | 6f 64 20 69 73 20 63 61 |his meth|od is ca|
|00003fa0| 6c 6c 65 64 20 66 72 6f | 6d 20 74 68 65 20 48 61 |lled fro|m the Ha|
|00003fb0| 6e 64 6c 65 52 65 63 6f | 72 64 20 6d 65 74 68 6f |ndleReco|rd metho|
|00003fc0| 64 2e 20 20 49 74 20 0d | 0a 2a 20 20 72 65 74 75 |d. It .|.* retu|
|00003fd0| 72 6e 73 20 74 68 65 20 | 63 68 61 72 61 63 74 65 |rns the |characte|
|00003fe0| 72 20 65 71 75 69 76 61 | 6c 65 6e 74 20 6f 66 20 |r equiva|lent of |
|00003ff0| 74 68 65 20 76 61 6c 75 | 65 20 70 61 73 73 65 64 |the valu|e passed|
|00004000| 20 69 6e 20 61 73 20 61 | 0d 0a 2a 20 20 70 61 72 | in as a|..* par|
|00004010| 61 6d 65 74 65 72 2e 20 | 20 49 66 20 61 20 6d 65 |ameter. | If a me|
|00004020| 6d 6f 20 66 69 65 6c 64 | 20 69 73 20 70 61 73 73 |mo field| is pass|
|00004030| 65 64 20 69 6e 2c 20 61 | 20 6e 6f 74 69 63 65 20 |ed in, a| notice |
|00004040| 74 6f 20 74 68 69 73 0d | 0a 2a 20 20 65 66 66 65 |to this.|.* effe|
|00004050| 63 74 20 69 73 20 72 65 | 74 75 72 6e 65 64 20 72 |ct is re|turned r|
|00004060| 61 74 68 65 72 20 74 68 | 61 6e 20 74 68 65 20 76 |ather th|an the v|
|00004070| 61 6c 75 65 20 69 6e 20 | 74 68 65 20 6d 65 6d 6f |alue in |the memo|
|00004080| 20 66 69 65 6c 64 20 73 | 6f 0d 0a 2a 20 20 74 68 | field s|o..* th|
|00004090| 61 74 20 70 6f 74 65 6e | 74 69 61 6c 6c 79 20 6c |at poten|tially l|
|000040a0| 61 72 67 65 20 61 6d 6f | 75 6e 74 73 20 6f 66 20 |arge amo|unts of |
|000040b0| 74 65 78 74 20 61 72 65 | 6e 27 74 20 64 69 73 70 |text are|n't disp|
|000040c0| 6c 61 79 65 64 20 69 6e | 20 74 68 65 20 0d 0a 2a |layed in| the ..*|
|000040d0| 20 20 6d 65 73 73 61 67 | 65 62 6f 78 2e 0d 0a 2a | messag|ebox...*|
|000040e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000040f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2a |--------|-------*|
|00004120| 0d 0a 0d 0a 4c 50 41 52 | 41 4d 45 54 45 52 53 20 |....LPAR|AMETERS |
|00004130| 6c 75 56 61 6c 75 65 0d | 0a 0d 0a 6d 2e 75 54 79 |luValue.|...m.uTy|
|00004140| 70 65 20 3d 20 54 59 50 | 45 28 27 6d 2e 6c 75 56 |pe = TYP|E('m.luV|
|00004150| 61 6c 75 65 27 29 0d 0a | 44 4f 20 43 41 53 45 0d |alue')..|DO CASE.|
|00004160| 0a 09 43 41 53 45 20 6d | 2e 75 54 79 70 65 20 3d |..CASE m|.uType =|
|00004170| 20 27 43 27 0d 0a 09 09 | 52 45 54 55 52 4e 20 41 | 'C'....|RETURN A|
|00004180| 4c 4c 54 52 49 4d 28 6d | 2e 6c 75 56 61 6c 75 65 |LLTRIM(m|.luValue|
|00004190| 29 0d 0a 09 43 41 53 45 | 20 49 4e 4c 49 53 54 28 |)...CASE| INLIST(|
|000041a0| 6d 2e 75 54 79 70 65 2c | 20 27 4e 27 2c 20 27 59 |m.uType,| 'N', 'Y|
|000041b0| 27 29 0d 0a 09 09 52 45 | 54 55 52 4e 20 41 4c 4c |')....RE|TURN ALL|
|000041c0| 54 52 49 4d 28 53 54 52 | 28 6d 2e 6c 75 56 61 6c |TRIM(STR|(m.luVal|
|000041d0| 75 65 29 29 0d 0a 09 43 | 41 53 45 20 6d 2e 75 54 |ue))...C|ASE m.uT|
|000041e0| 79 70 65 20 3d 20 27 44 | 27 0d 0a 09 09 52 45 54 |ype = 'D|'....RET|
|000041f0| 55 52 4e 20 44 54 4f 43 | 28 6d 2e 6c 75 56 61 6c |URN DTOC|(m.luVal|
|00004200| 75 65 29 0d 0a 09 43 41 | 53 45 20 6d 2e 75 54 79 |ue)...CA|SE m.uTy|
|00004210| 70 65 20 3d 20 27 54 27 | 0d 0a 09 09 52 45 54 55 |pe = 'T'|....RETU|
|00004220| 52 4e 20 54 54 4f 43 28 | 27 6d 2e 6c 75 56 61 6c |RN TTOC(|'m.luVal|
|00004230| 75 65 27 29 0d 0a 09 43 | 41 53 45 20 6d 2e 75 54 |ue')...C|ASE m.uT|
|00004240| 79 70 65 20 3d 20 27 4c | 27 0d 0a 09 09 52 45 54 |ype = 'L|'....RET|
|00004250| 55 52 4e 20 49 49 46 28 | 6d 2e 6c 75 56 61 6c 75 |URN IIF(|m.luValu|
|00004260| 65 2c 20 27 2e 54 2e 27 | 2c 20 27 2e 46 2e 27 29 |e, '.T.'|, '.F.')|
|00004270| 0d 0a 09 43 41 53 45 20 | 75 54 79 70 65 20 3d 20 |...CASE |uType = |
|00004280| 27 4d 27 0d 0a 09 09 52 | 45 54 55 52 4e 20 27 4d |'M'....R|ETURN 'M|
|00004290| 65 6d 6f 20 66 69 65 6c | 64 27 0d 0a 45 4e 44 43 |emo fiel|d'..ENDC|
|000042a0| 41 53 45 0d 0a 45 4e 44 | 50 52 4f 43 0d 0a 50 52 |ASE..END|PROC..PR|
|000042b0| 4f 43 45 44 55 52 45 20 | 76 65 72 69 66 79 63 68 |OCEDURE |verifych|
|000042c0| 61 6e 67 65 73 0d 0a 2a | 2d 2d 2d 2d 2d 2d 2d 2d |anges..*|--------|
|000042d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000042f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004300| 2d 2d 2d 2d 2d 2d 2d 2a | 0d 0a 2a 20 20 49 66 20 |-------*|..* If |
|00004310| 61 6e 79 20 63 68 61 6e | 67 65 73 20 68 61 76 65 |any chan|ges have|
|00004320| 20 62 65 65 6e 20 6d 61 | 64 65 20 74 6f 20 74 68 | been ma|de to th|
|00004330| 65 20 74 61 62 6c 65 20 | 6f 72 20 72 65 63 6f 72 |e table |or recor|
|00004340| 64 2c 20 70 72 6f 6d 70 | 74 20 74 68 65 0d 0a 2a |d, promp|t the..*|
|00004350| 20 20 75 73 65 72 20 74 | 6f 20 73 61 76 65 20 74 | user t|o save t|
|00004360| 68 65 20 63 68 61 6e 67 | 65 73 2e 20 20 49 66 20 |he chang|es. If |
|00004370| 74 68 65 20 75 73 65 72 | 20 73 61 79 73 20 27 79 |the user| says 'y|
|00004380| 65 73 2c 27 20 61 6c 6c | 20 63 68 61 6e 67 65 73 |es,' all| changes|
|00004390| 0d 0a 2a 20 20 61 72 65 | 20 73 61 76 65 64 2e 20 |..* are| saved. |
|000043a0| 20 41 6e 79 20 63 68 61 | 6e 67 65 73 20 6d 61 64 | Any cha|nges mad|
|000043b0| 65 20 74 6f 20 74 68 65 | 20 64 61 74 61 20 62 79 |e to the| data by|
|000043c0| 20 6f 74 68 65 72 20 75 | 73 65 72 73 20 61 66 74 | other u|sers aft|
|000043d0| 65 72 0d 0a 2a 20 20 74 | 68 69 73 20 75 73 65 72 |er..* t|his user|
|000043e0| 20 6d 61 64 65 20 74 68 | 65 20 63 68 61 6e 67 65 | made th|e change|
|000043f0| 20 61 6e 64 20 62 65 66 | 6f 72 65 20 74 68 65 20 | and bef|ore the |
|00004400| 63 68 61 6e 67 65 20 77 | 61 73 20 63 6f 6d 6d 69 |change w|as commi|
|00004410| 74 74 65 64 0d 0a 2a 20 | 20 77 69 6c 6c 20 62 65 |tted..* | will be|
|00004420| 20 6c 6f 73 74 2e 0d 0a | 2a 0d 0a 2a 20 20 52 45 | lost...|*..* RE|
|00004430| 54 55 52 4e 53 20 4e 55 | 4d 45 52 49 43 20 56 41 |TURNS NU|MERIC VA|
|00004440| 4c 55 45 53 3a 0d 0a 2a | 20 20 20 20 30 20 2d 2d |LUES:..*| 0 --|
|00004450| 20 4e 6f 20 43 68 61 6e | 67 65 73 20 4d 61 64 65 | No Chan|ges Made|
|00004460| 20 74 6f 20 74 68 65 20 | 43 75 72 72 65 6e 74 20 | to the |Current |
|00004470| 56 61 6c 75 65 73 0d 0a | 2a 20 20 20 20 31 20 2d |Values..|* 1 -|
|00004480| 2d 20 53 75 63 63 65 73 | 73 66 75 6c 6c 79 20 4d |- Succes|sfully M|
|00004490| 61 64 65 20 41 6c 6c 20 | 55 73 65 72 20 43 68 61 |ade All |User Cha|
|000044a0| 6e 67 65 73 0d 0a 2a 09 | 20 32 20 2d 2d 20 55 6e |nges..*.| 2 -- Un|
|000044b0| 61 62 6c 65 20 74 6f 20 | 57 72 69 74 65 20 4f 6e |able to |Write On|
|000044c0| 65 20 6f 72 20 4d 6f 72 | 65 20 55 73 65 72 2d 53 |e or Mor|e User-S|
|000044d0| 70 65 63 69 66 65 64 20 | 43 68 61 6e 67 65 73 20 |pecifed |Changes |
|000044e0| 74 6f 20 54 61 62 6c 65 | 0d 0a 2a 2d 2d 2d 2d 2d |to Table|..*-----|
|000044f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004500| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004510| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004520| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2a 0d 0a 0d 0a 2a |--------|--*....*|
|00004530| 20 44 65 63 6c 61 72 65 | 20 63 6f 6e 73 74 61 6e | Declare| constan|
|00004540| 74 73 20 26 20 76 61 72 | 69 61 62 6c 65 73 0d 0a |ts & var|iables..|
|00004550| 23 64 65 66 69 6e 65 20 | 53 41 56 45 43 48 47 5f |#define |SAVECHG_|
|00004560| 4c 4f 43 20 27 44 6f 20 | 79 6f 75 20 77 61 6e 74 |LOC 'Do |you want|
|00004570| 20 74 6f 20 73 61 76 65 | 20 79 6f 75 72 20 63 68 | to save| your ch|
|00004580| 61 6e 67 65 73 3f 27 0d | 0a 23 64 65 66 69 6e 65 |anges?'.|.#define|
|00004590| 20 53 41 56 45 43 48 47 | 32 5f 4c 4f 43 20 27 53 | SAVECHG|2_LOC 'S|
|000045a0| 61 76 65 20 43 68 61 6e | 67 65 73 27 0d 0a 23 64 |ave Chan|ges'..#d|
|000045b0| 65 66 69 6e 65 20 4e 4f | 42 55 46 46 5f 4c 4f 43 |efine NO|BUFF_LOC|
|000045c0| 32 20 27 44 61 74 61 20 | 62 75 66 66 65 72 69 6e |2 'Data |bufferin|
|000045d0| 67 20 69 73 20 6e 6f 74 | 20 65 6e 61 62 6c 65 64 |g is not| enabled|
|000045e0| 2e 27 0d 0a 0d 0a 4c 4f | 43 41 4c 20 6c 6e 43 68 |.'....LO|CAL lnCh|
|000045f0| 6f 69 63 65 2c 20 6c 6c | 4d 61 64 65 43 68 61 6e |oice, ll|MadeChan|
|00004600| 67 65 2c 20 6c 6e 53 75 | 63 63 65 73 73 0d 0a 6d |ge, lnSu|ccess..m|
|00004610| 2e 6c 6c 4d 61 64 65 43 | 68 61 6e 67 65 20 3d 20 |.llMadeC|hange = |
|00004620| 2e 46 2e 0d 0a 6d 2e 6c | 6e 53 75 63 63 65 73 73 |.F...m.l|nSuccess|
|00004630| 20 3d 20 30 0d 0a 0d 0a | 2a 20 49 66 20 74 68 65 | = 0....|* If the|
|00004640| 20 75 73 65 72 20 68 61 | 73 20 63 68 61 6e 67 65 | user ha|s change|
|00004650| 64 20 61 6e 79 74 68 69 | 6e 67 2c 20 70 72 6f 6d |d anythi|ng, prom|
|00004660| 70 74 20 74 6f 20 73 61 | 76 65 20 6f 72 20 64 69 |pt to sa|ve or di|
|00004670| 73 63 61 72 64 20 63 68 | 61 6e 67 65 73 0d 0a 44 |scard ch|anges..D|
|00004680| 4f 20 43 41 53 45 0d 0a | 09 43 41 53 45 20 49 4e |O CASE..|.CASE IN|
|00004690| 4c 49 53 54 28 43 55 52 | 53 4f 52 47 45 54 50 52 |LIST(CUR|SORGETPR|
|000046a0| 4f 50 28 27 42 75 66 66 | 65 72 69 6e 67 27 29 2c |OP('Buff|ering'),|
|000046b0| 20 32 2c 33 29 20 26 26 | 20 52 6f 77 20 42 75 66 | 2,3) &&| Row Buf|
|000046c0| 66 65 72 69 6e 67 0d 0a | 09 09 49 46 20 27 32 27 |fering..|..IF '2'|
|000046d0| 20 24 20 47 45 54 46 4c | 44 53 54 41 54 45 28 2d | $ GETFL|DSTATE(-|
|000046e0| 31 29 0d 0a 09 09 09 6d | 2e 6c 6c 4d 61 64 65 43 |1).....m|.llMadeC|
|000046f0| 68 61 6e 67 65 20 3d 20 | 2e 54 2e 0d 0a 09 09 45 |hange = |.T.....E|
|00004700| 4e 44 49 46 0d 0a 09 43 | 41 53 45 20 49 4e 4c 49 |NDIF...C|ASE INLI|
|00004710| 53 54 28 43 55 52 53 4f | 52 47 45 54 50 52 4f 50 |ST(CURSO|RGETPROP|
|00004720| 28 27 42 75 66 66 65 72 | 69 6e 67 27 29 2c 20 34 |('Buffer|ing'), 4|
|00004730| 2c 35 29 20 26 26 20 54 | 61 62 6c 65 20 42 75 66 |,5) && T|able Buf|
|00004740| 66 65 72 69 6e 67 0d 0a | 09 09 49 46 20 47 45 54 |fering..|..IF GET|
|00004750| 4e 45 58 54 4d 4f 44 49 | 46 49 45 44 28 30 29 20 |NEXTMODI|FIED(0) |
|00004760| 3e 20 30 0d 0a 09 09 09 | 6d 2e 6c 6c 4d 61 64 65 |> 0.....|m.llMade|
|00004770| 43 68 61 6e 67 65 20 3d | 20 2e 54 2e 0d 0a 09 09 |Change =| .T.....|
|00004780| 45 4e 44 49 46 0d 0a 09 | 4f 54 48 45 52 57 49 53 |ENDIF...|OTHERWIS|
|00004790| 45 0d 0a 09 09 57 41 49 | 54 20 57 49 4e 44 4f 57 |E....WAI|T WINDOW|
|000047a0| 20 4e 4f 42 55 46 46 5f | 4c 4f 43 20 4e 4f 57 41 | NOBUFF_|LOC NOWA|
|000047b0| 49 54 0d 0a 45 4e 44 43 | 41 53 45 0d 0a 0d 0a 49 |IT..ENDC|ASE....I|
|000047c0| 46 20 6d 2e 6c 6c 4d 61 | 64 65 43 68 61 6e 67 65 |F m.llMa|deChange|
|000047d0| 0d 0a 09 6d 2e 6c 6e 43 | 68 6f 69 63 65 20 3d 20 |...m.lnC|hoice = |
|000047e0| 4d 45 53 53 41 47 45 42 | 4f 58 28 53 41 56 45 43 |MESSAGEB|OX(SAVEC|
|000047f0| 48 47 5f 4c 4f 43 2c 20 | 34 2b 33 32 2c 20 53 41 |HG_LOC, |4+32, SA|
|00004800| 56 45 43 48 47 32 5f 4c | 4f 43 29 0d 0a 09 49 46 |VECHG2_L|OC)...IF|
|00004810| 20 6d 2e 6c 6e 43 68 6f | 69 63 65 20 3d 20 36 20 | m.lnCho|ice = 6 |
|00004820| 26 26 20 59 65 73 0d 0a | 09 09 6d 2e 6c 6e 53 75 |&& Yes..|..m.lnSu|
|00004830| 63 63 65 73 73 20 3d 20 | 49 49 46 28 54 41 42 4c |ccess = |IIF(TABL|
|00004840| 45 55 50 44 41 54 45 28 | 2e 54 2e 2c 2e 54 2e 29 |EUPDATE(|.T.,.T.)|
|00004850| 2c 20 31 2c 20 32 29 0d | 0a 09 45 4c 53 45 0d 0a |, 1, 2).|..ELSE..|
|00004860| 09 09 3d 54 41 42 4c 45 | 52 45 56 45 52 54 28 2e |..=TABLE|REVERT(.|
|00004870| 54 2e 29 0d 0a 09 45 4e | 44 49 46 0d 0a 45 4e 44 |T.)...EN|DIF..END|
|00004880| 49 46 09 0d 0a 52 45 54 | 55 52 4e 20 6d 2e 6c 6e |IF...RET|URN m.ln|
|00004890| 53 75 63 63 65 73 73 0d | 0a 45 4e 44 50 52 4f 43 |Success.|.ENDPROC|
|000048a0| 0d 0a 50 52 4f 43 45 44 | 55 52 45 20 76 65 72 69 |..PROCED|URE veri|
|000048b0| 66 79 65 61 63 68 63 68 | 61 6e 67 65 0d 0a 2a 2d |fyeachch|ange..*-|
|000048c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000048d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000048e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000048f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004900| 2d 2d 2d 0d 0a 2a 20 20 | 49 66 20 61 6e 79 20 63 |---..* |If any c|
|00004910| 68 61 6e 67 65 73 20 68 | 61 76 65 20 62 65 65 6e |hanges h|ave been|
|00004920| 20 6d 61 64 65 20 74 6f | 20 74 68 65 20 74 61 62 | made to| the tab|
|00004930| 6c 65 20 6f 72 20 72 65 | 63 6f 72 64 2c 20 66 6f |le or re|cord, fo|
|00004940| 72 20 65 61 63 68 0d 0a | 2a 20 20 63 68 61 6e 67 |r each..|* chang|
|00004950| 65 2c 20 64 69 73 70 6c | 61 79 20 74 68 65 20 6f |e, displ|ay the o|
|00004960| 6c 64 20 76 61 6c 75 65 | 20 61 6e 64 20 74 68 65 |ld value| and the|
|00004970| 20 6e 65 77 20 76 61 6c | 75 65 2c 20 70 72 6f 6d | new val|ue, prom|
|00004980| 70 74 69 6e 67 20 74 68 | 65 0d 0a 2a 20 20 75 73 |pting th|e..* us|
|00004990| 65 72 20 74 6f 20 73 61 | 76 65 20 6f 72 20 64 69 |er to sa|ve or di|
|000049a0| 73 63 61 72 64 20 74 68 | 65 20 63 68 61 6e 67 65 |scard th|e change|
|000049b0| 2e 20 20 43 6f 6e 66 6c | 69 63 74 20 6d 61 6e 61 |. Confl|ict mana|
|000049c0| 67 65 6d 65 6e 74 20 69 | 73 20 61 6c 73 6f 0d 0a |gement i|s also..|
|000049d0| 2a 20 20 69 6e 63 6c 75 | 64 65 64 20 69 6e 20 74 |* inclu|ded in t|
|000049e0| 68 65 20 48 61 6e 64 6c | 65 52 65 63 6f 72 64 20 |he Handl|eRecord |
|000049f0| 6d 65 74 68 6f 64 2e 0d | 0a 2a 0d 0a 2a 20 20 52 |method..|.*..* R|
|00004a00| 45 54 55 52 4e 53 20 4e | 55 4d 45 52 49 43 20 56 |ETURNS N|UMERIC V|
|00004a10| 41 4c 55 45 53 3a 0d 0a | 2a 20 20 20 20 30 20 2d |ALUES:..|* 0 -|
|00004a20| 2d 20 4e 6f 20 43 68 61 | 6e 67 65 73 20 4d 61 64 |- No Cha|nges Mad|
|00004a30| 65 20 74 6f 20 74 68 65 | 20 43 75 72 72 65 6e 74 |e to the| Current|
|00004a40| 20 56 61 6c 75 65 73 0d | 0a 2a 20 20 20 20 31 20 | Values.|.* 1 |
|00004a50| 2d 2d 20 53 75 63 63 65 | 73 73 66 75 6c 6c 79 20 |-- Succe|ssfully |
|00004a60| 4d 61 64 65 20 55 73 65 | 72 2d 53 70 65 63 69 66 |Made Use|r-Specif|
|00004a70| 69 65 64 20 43 68 61 6e | 67 65 73 0d 0a 2a 09 20 |ied Chan|ges..*. |
|00004a80| 32 20 2d 2d 20 55 6e 61 | 62 6c 65 20 74 6f 20 57 |2 -- Una|ble to W|
|00004a90| 72 69 74 65 20 4f 6e 65 | 20 6f 72 20 4d 6f 72 65 |rite One| or More|
|00004aa0| 20 55 73 65 72 2d 53 70 | 65 63 69 66 65 64 20 43 | User-Sp|ecifed C|
|00004ab0| 68 61 6e 67 65 73 20 74 | 6f 20 54 61 62 6c 65 0d |hanges t|o Table.|
|00004ac0| 0a 2a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.*------|--------|
|00004ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ae0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004af0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004b00| 2d 2a 0d 0a 0d 0a 23 64 | 65 66 69 6e 65 20 4e 4f |-*....#d|efine NO|
|00004b10| 42 55 46 46 5f 4c 4f 43 | 33 20 27 44 61 74 61 20 |BUFF_LOC|3 'Data |
|00004b20| 62 75 66 66 65 72 69 6e | 67 20 69 73 20 6e 6f 74 |bufferin|g is not|
|00004b30| 20 65 6e 61 62 6c 65 64 | 2e 27 0d 0a 4c 4f 43 41 | enabled|.'..LOCA|
|00004b40| 4c 20 6c 6e 53 75 63 63 | 65 73 73 2c 20 6c 6e 52 |L lnSucc|ess, lnR|
|00004b50| 65 63 0d 0a 6d 2e 6c 6e | 53 75 63 63 65 73 73 20 |ec..m.ln|Success |
|00004b60| 3d 20 30 0d 0a 0d 0a 44 | 4f 20 43 41 53 45 0d 0a |= 0....D|O CASE..|
|00004b70| 09 43 41 53 45 20 49 4e | 4c 49 53 54 28 43 55 52 |.CASE IN|LIST(CUR|
|00004b80| 53 4f 52 47 45 54 50 52 | 4f 50 28 27 42 75 66 66 |SORGETPR|OP('Buff|
|00004b90| 65 72 69 6e 67 27 29 2c | 20 32 2c 33 29 20 26 26 |ering'),| 2,3) &&|
|00004ba0| 20 52 6f 77 20 42 75 66 | 66 65 72 69 6e 67 0d 0a | Row Buf|fering..|
|00004bb0| 09 09 49 46 20 27 32 27 | 20 24 20 47 45 54 46 4c |..IF '2'| $ GETFL|
|00004bc0| 44 53 54 41 54 45 28 2d | 31 29 09 09 09 09 20 26 |DSTATE(-|1).... &|
|00004bd0| 26 20 44 61 74 61 20 68 | 61 73 20 63 68 61 6e 67 |& Data h|as chang|
|00004be0| 65 64 0d 0a 09 09 09 6d | 2e 6c 6e 53 75 63 63 65 |ed.....m|.lnSucce|
|00004bf0| 73 73 20 3d 20 54 48 49 | 53 2e 48 61 6e 64 6c 65 |ss = THI|S.Handle|
|00004c00| 52 65 63 6f 72 64 28 31 | 29 0d 0a 09 09 45 4e 44 |Record(1|)....END|
|00004c10| 49 46 09 0d 0a 09 43 41 | 53 45 20 49 4e 4c 49 53 |IF....CA|SE INLIS|
|00004c20| 54 28 43 55 52 53 4f 52 | 47 45 54 50 52 4f 50 28 |T(CURSOR|GETPROP(|
|00004c30| 27 42 75 66 66 65 72 69 | 6e 67 27 29 2c 20 34 2c |'Bufferi|ng'), 4,|
|00004c40| 35 29 20 26 26 20 54 61 | 62 6c 65 20 42 75 66 66 |5) && Ta|ble Buff|
|00004c50| 65 72 69 6e 67 0d 0a 09 | 09 6d 2e 6c 6e 52 65 63 |ering...|.m.lnRec|
|00004c60| 20 3d 20 47 45 54 4e 45 | 58 54 4d 4f 44 49 46 49 | = GETNE|XTMODIFI|
|00004c70| 45 44 28 30 29 0d 0a 09 | 09 44 4f 20 57 48 49 4c |ED(0)...|.DO WHIL|
|00004c80| 45 20 6d 2e 6c 6e 52 65 | 63 20 3e 20 30 0d 0a 09 |E m.lnRe|c > 0...|
|00004c90| 09 09 47 4f 20 6d 2e 6c | 6e 52 65 63 0d 0a 09 09 |..GO m.l|nRec....|
|00004ca0| 09 6d 2e 6c 6e 53 75 63 | 63 65 73 73 20 3d 20 49 |.m.lnSuc|cess = I|
|00004cb0| 49 46 28 6d 2e 6c 6e 53 | 75 63 63 65 73 73 20 21 |IF(m.lnS|uccess !|
|00004cc0| 3d 20 32 2c 20 54 48 49 | 53 2e 48 61 6e 64 6c 65 |= 2, THI|S.Handle|
|00004cd0| 52 65 63 6f 72 64 28 31 | 29 2c 20 32 29 0d 0a 09 |Record(1|), 2)...|
|00004ce0| 09 09 6d 2e 6c 6e 52 65 | 63 20 3d 20 47 45 54 4e |..m.lnRe|c = GETN|
|00004cf0| 45 58 54 4d 4f 44 49 46 | 49 45 44 28 6d 2e 6c 6e |EXTMODIF|IED(m.ln|
|00004d00| 52 65 63 29 09 0d 0a 09 | 09 45 4e 44 44 4f 0d 0a |Rec)....|.ENDDO..|
|00004d10| 09 4f 54 48 45 52 57 49 | 53 45 09 09 09 09 09 09 |.OTHERWI|SE......|
|00004d20| 09 09 09 20 26 26 20 4e | 6f 20 42 75 66 66 65 72 |... && N|o Buffer|
|00004d30| 69 6e 67 0d 0a 09 09 57 | 41 49 54 20 57 49 4e 44 |ing....W|AIT WIND|
|00004d40| 4f 57 20 4e 4f 42 55 46 | 46 5f 4c 4f 43 20 4e 4f |OW NOBUF|F_LOC NO|
|00004d50| 57 41 49 54 0d 0a 45 4e | 44 43 41 53 45 0d 0a 52 |WAIT..EN|DCASE..R|
|00004d60| 45 54 55 52 4e 20 6d 2e | 6c 6e 53 75 63 63 65 73 |ETURN m.|lnSucces|
|00004d70| 73 0d 0a 45 4e 44 50 52 | 4f 43 0d 0a 50 52 4f 43 |s..ENDPR|OC..PROC|
|00004d80| 45 44 55 52 45 20 63 68 | 65 63 6b 63 6f 6e 66 6c |EDURE ch|eckconfl|
|00004d90| 69 63 74 73 0d 0a 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |icts..*-|--------|
|00004da0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004db0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004dd0| 2d 2d 2d 2d 2d 2d 2a 0d | 0a 2a 20 20 43 68 65 63 |------*.|.* Chec|
|00004de0| 6b 73 20 74 6f 20 73 65 | 65 20 77 68 65 74 68 65 |ks to se|e whethe|
|00004df0| 72 20 61 6e 6f 74 68 65 | 72 20 75 73 65 72 20 68 |r anothe|r user h|
|00004e00| 61 73 20 63 68 61 6e 67 | 65 64 20 74 68 65 20 76 |as chang|ed the v|
|00004e10| 61 6c 75 65 20 0d 0a 2a | 20 20 73 74 6f 72 65 64 |alue ..*| stored|
|00004e20| 20 69 6e 20 61 20 74 61 | 62 6c 65 2e 20 20 49 66 | in a ta|ble. If|
|00004e30| 20 73 6f 2c 20 63 61 6c | 6c 73 20 48 61 6e 64 6c | so, cal|ls Handl|
|00004e40| 65 52 65 63 6f 72 64 20 | 74 6f 20 64 69 73 70 6c |eRecord |to displ|
|00004e50| 61 79 0d 0a 2a 20 20 74 | 68 65 20 6e 65 77 20 76 |ay..* t|he new v|
|00004e60| 61 6c 75 65 20 61 6e 64 | 20 61 6c 6c 6f 77 20 74 |alue and| allow t|
|00004e70| 68 65 20 75 73 65 72 20 | 74 6f 20 64 65 63 69 64 |he user |to decid|
|00004e80| 65 20 77 68 61 74 20 74 | 6f 20 64 6f 2e 0d 0a 2a |e what t|o do...*|
|00004e90| 0d 0a 2a 20 20 52 45 54 | 55 52 4e 53 20 4e 55 4d |..* RET|URNS NUM|
|00004ea0| 45 52 49 43 20 56 41 4c | 55 45 53 3a 0d 0a 2a 20 |ERIC VAL|UES:..* |
|00004eb0| 20 20 20 30 20 2d 2d 20 | 4e 6f 20 43 68 61 6e 67 | 0 -- |No Chang|
|00004ec0| 65 73 20 4d 61 64 65 20 | 74 6f 20 74 68 65 20 43 |es Made |to the C|
|00004ed0| 75 72 72 65 6e 74 20 56 | 61 6c 75 65 73 0d 0a 2a |urrent V|alues..*|
|00004ee0| 20 20 20 20 31 20 2d 2d | 20 53 75 63 63 65 73 73 | 1 --| Success|
|00004ef0| 66 75 6c 6c 79 20 4d 61 | 64 65 20 55 73 65 72 2d |fully Ma|de User-|
|00004f00| 53 70 65 63 69 66 69 65 | 64 20 43 68 61 6e 67 65 |Specifie|d Change|
|00004f10| 73 0d 0a 2a 09 20 32 20 | 2d 2d 20 55 6e 61 62 6c |s..*. 2 |-- Unabl|
|00004f20| 65 20 74 6f 20 4d 61 6b | 65 20 57 72 69 74 65 20 |e to Mak|e Write |
|00004f30| 4f 6e 65 20 6f 72 20 4d | 6f 72 65 20 55 73 65 72 |One or M|ore User|
|00004f40| 2d 53 70 65 63 69 66 65 | 64 20 43 68 61 6e 67 65 |-Specife|d Change|
|00004f50| 73 20 74 6f 20 54 61 62 | 6c 65 0d 0a 2a 2d 2d 2d |s to Tab|le..*---|
|00004f60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004f90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2a 0d 0a 0d |--------|----*...|
|00004fa0| 0a 23 64 65 66 69 6e 65 | 20 4e 4f 42 55 46 46 31 |.#define| NOBUFF1|
|00004fb0| 5f 4c 4f 43 20 27 44 61 | 74 61 20 62 75 66 66 65 |_LOC 'Da|ta buffe|
|00004fc0| 72 69 6e 67 20 69 73 20 | 6e 6f 74 20 65 6e 61 62 |ring is |not enab|
|00004fd0| 6c 65 64 2e 27 0d 0a 4c | 4f 43 41 4c 20 6c 6e 53 |led.'..L|OCAL lnS|
|00004fe0| 75 63 63 65 73 73 2c 20 | 6c 6c 6e 52 65 63 0d 0a |uccess, |llnRec..|
|00004ff0| 6d 2e 6c 6e 53 75 63 63 | 65 73 73 20 3d 20 30 20 |m.lnSucc|ess = 0 |
|00005000| 20 0d 0a 0d 0a 44 4f 20 | 43 41 53 45 0d 0a 09 43 | ....DO |CASE...C|
|00005010| 41 53 45 20 49 4e 4c 49 | 53 54 28 43 55 52 53 4f |ASE INLI|ST(CURSO|
|00005020| 52 47 45 54 50 52 4f 50 | 28 27 42 75 66 66 65 72 |RGETPROP|('Buffer|
|00005030| 69 6e 67 27 29 2c 20 32 | 2c 33 29 20 26 26 20 52 |ing'), 2|,3) && R|
|00005040| 6f 77 20 42 75 66 66 65 | 72 69 6e 67 0d 0a 09 09 |ow Buffe|ring....|
|00005050| 49 46 20 27 32 27 20 24 | 20 47 45 54 46 4c 44 53 |IF '2' $| GETFLDS|
|00005060| 54 41 54 45 28 2d 31 29 | 09 09 09 09 20 26 26 20 |TATE(-1)|.... && |
|00005070| 44 61 74 61 20 68 61 73 | 20 63 68 61 6e 67 65 64 |Data has| changed|
|00005080| 0d 0a 09 09 09 6d 2e 6c | 6e 53 75 63 63 65 73 73 |.....m.l|nSuccess|
|00005090| 20 3d 20 54 48 49 53 2e | 48 61 6e 64 6c 65 52 65 | = THIS.|HandleRe|
|000050a0| 63 6f 72 64 28 30 29 0d | 0a 09 09 45 4e 44 49 46 |cord(0).|...ENDIF|
|000050b0| 09 0d 0a 09 43 41 53 45 | 20 49 4e 4c 49 53 54 28 |....CASE| INLIST(|
|000050c0| 43 55 52 53 4f 52 47 45 | 54 50 52 4f 50 28 27 42 |CURSORGE|TPROP('B|
|000050d0| 75 66 66 65 72 69 6e 67 | 27 29 2c 20 34 2c 35 29 |uffering|'), 4,5)|
|000050e0| 20 26 26 20 54 61 62 6c | 65 20 42 75 66 66 65 72 | && Tabl|e Buffer|
|000050f0| 69 6e 67 0d 0a 09 09 6d | 2e 6c 6c 6e 52 65 63 20 |ing....m|.llnRec |
|00005100| 3d 20 47 45 54 4e 45 58 | 54 4d 4f 44 49 46 49 45 |= GETNEX|TMODIFIE|
|00005110| 44 28 30 29 0d 0a 09 09 | 44 4f 20 57 48 49 4c 45 |D(0)....|DO WHILE|
|00005120| 20 6d 2e 6c 6c 6e 52 65 | 63 20 3e 20 30 0d 0a 09 | m.llnRe|c > 0...|
|00005130| 09 09 47 4f 20 6d 2e 6c | 6c 6e 52 65 63 0d 0a 09 |..GO m.l|lnRec...|
|00005140| 09 09 6d 2e 6c 6e 53 75 | 63 63 65 73 73 20 3d 20 |..m.lnSu|ccess = |
|00005150| 49 49 46 28 6d 2e 6c 6e | 53 75 63 63 65 73 73 20 |IIF(m.ln|Success |
|00005160| 21 3d 20 32 2c 20 54 48 | 49 53 2e 48 61 6e 64 6c |!= 2, TH|IS.Handl|
|00005170| 65 52 65 63 6f 72 64 28 | 30 29 2c 20 32 29 0d 0a |eRecord(|0), 2)..|
|00005180| 09 09 09 6d 2e 6c 6c 6e | 52 65 63 20 3d 20 47 45 |...m.lln|Rec = GE|
|00005190| 54 4e 45 58 54 4d 4f 44 | 49 46 49 45 44 28 6d 2e |TNEXTMOD|IFIED(m.|
|000051a0| 6c 6c 6e 52 65 63 29 09 | 0d 0a 09 09 45 4e 44 44 |llnRec).|....ENDD|
|000051b0| 4f 0d 0a 09 4f 54 48 45 | 52 57 49 53 45 09 09 09 |O...OTHE|RWISE...|
|000051c0| 09 09 09 09 09 09 20 26 | 26 20 6e 6f 20 62 75 66 |...... &|& no buf|
|000051d0| 66 65 72 69 6e 67 0d 0a | 09 09 57 41 49 54 20 57 |fering..|..WAIT W|
|000051e0| 49 4e 44 4f 57 20 4e 4f | 42 55 46 46 5f 4c 4f 43 |INDOW NO|BUFF_LOC|
|000051f0| 20 4e 4f 57 41 49 54 0d | 0a 45 4e 44 43 41 53 45 | NOWAIT.|.ENDCASE|
|00005200| 0d 0a 52 45 54 55 52 4e | 20 6d 2e 6c 6e 53 75 63 |..RETURN| m.lnSuc|
|00005210| 63 65 73 73 0d 0a 45 4e | 44 50 52 4f 43 0d 0a 00 |cess..EN|DPROC...|
|00005220| 00 00 01 00 00 0e c0 fe | f2 ff 20 02 01 00 00 00 |........|.. .....|
|00005230| a7 0e 00 00 a7 0e 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00005240| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 b4 ce |........|........|
|00005250| 05 00 00 00 25 00 00 00 | a9 0c 00 00 00 00 00 00 |....%...|........|
|00005260| 1e 0e 00 00 83 00 00 00 | 18 0d 00 00 00 00 00 00 |........|........|
|00005270| 00 00 00 00 fc 03 00 03 | 00 55 00 00 4f 06 07 00 |........|.U..O...|
|00005280| af f7 00 00 fe 1d 00 25 | fc 43 d9 09 00 6d 2e 6c |.......%|.C...m.l|
|00005290| 6e 53 63 6f 70 65 62 d9 | 01 00 4e 0f fd f9 05 33 |nScopeb.|..N....3|
|000052a0| 00 fe 0f 00 54 f5 0d f7 | 00 00 10 fc f8 01 00 fd |....T...|........|
|000052b0| fe 04 00 1e fe 18 00 25 | fc 43 f5 0d f7 00 00 f8 |.......%|.C......|
|000052c0| 01 00 f8 01 01 ab 0a fd | f9 05 8d 00 fe 3e 00 52 |........|.....>.R|
|000052d0| 2c fc d9 34 00 49 6e 76 | 61 6c 69 64 20 76 61 6c |,..4.Inv|alid val|
|000052e0| 75 65 20 70 61 73 73 65 | 64 20 74 6f 20 63 6f 6e |ue passe|d to con|
|000052f0| 66 6c 69 63 74 6d 61 6e | 61 67 65 72 2e 68 61 6e |flictman|ager.han|
|00005300| 64 6c 65 72 65 63 6f 72 | 64 fd fe 04 00 1e fe 23 |dlerecor|d......#|
|00005310| 00 ae f7 01 00 07 f7 02 | 00 07 f7 03 00 07 f7 04 |........|........|
|00005320| 00 07 f7 05 00 07 f7 06 | 00 07 f7 07 00 07 f7 08 |........|........|
|00005330| 00 fe 0d 00 54 f5 0d f7 | 07 00 10 fc 2d fd fe 0d |....T...|....-...|
|00005340| 00 54 f5 0d f7 08 00 10 | fc 61 fd fe 1e 00 25 fc |.T......|.a....%.|
|00005350| 43 fb 0a 00 53 6f 75 72 | 63 65 54 79 70 65 ea 89 |C...Sour|ceType..|
|00005360| f8 01 03 0f fd f9 05 f5 | 00 fe 09 00 86 fc 43 ea |........|......C.|
|00005370| 9d fd fe 04 00 1e fe 18 | 00 84 f5 0d f7 02 00 10 |........|........|
|00005380| fc f8 01 01 fd 28 fc 43 | 2e fd f9 05 fa 05 fe 0f |.....(.C|........|
|00005390| 00 54 f5 0d f7 01 00 10 | fc f8 01 00 fd fe 13 00 |.T......|........|
|000053a0| 54 f5 0d f7 03 00 10 fc | 43 f5 0d f7 02 00 2f fd |T.......|C...../.|
|000053b0| fe 16 00 25 fc 43 f5 0d | f7 03 00 62 d9 01 00 47 |...%.C..|...b...G|
|000053c0| 10 fd f9 05 4d 01 fe 04 | 00 2e fe 04 00 1e fe 14 |....M...|........|
|000053d0| 00 54 f5 0d f7 04 00 10 | fc 43 f5 0d f7 03 00 ea |.T......|.C......|
|000053e0| 5f fd fe 14 00 54 f5 0d | f7 05 00 10 fc 43 f5 0d |_....T..|.....C..|
|000053f0| f7 03 00 ea 8f fd fe 0d | 00 18 48 f9 05 86 01 f9 |........|..H.....|
|00005400| 05 97 05 fe 13 00 0c fc | f5 0d f7 00 00 f8 01 00 |........|........|
|00005410| 10 fd f9 05 84 03 fe 15 | 00 25 fc f5 0d f7 04 00 |........|.%......|
|00005420| f5 0d f7 05 00 0f fd f9 | 05 80 03 fe 0d 00 54 f5 |........|......T.|
|00005430| 0d f7 07 00 10 fc 61 fd | fe c5 01 54 f5 0d f7 01 |......a.|...T....|
|00005440| 00 10 fc 43 d9 29 00 41 | 20 76 61 6c 75 65 20 68 |...C.).A| value h|
|00005450| 61 73 20 62 65 65 6e 20 | 63 68 61 6e 67 65 64 20 |as been |changed |
|00005460| 62 79 20 61 6e 6f 74 68 | 65 72 20 75 73 65 72 2e |by anoth|er user.|
|00005470| 43 f8 02 0d 20 06 d9 07 | 00 46 69 65 6c 64 3a 20 |C... ...|.Field: |
|00005480| 06 f7 03 00 06 43 f8 02 | 0d 20 06 d9 0f 00 52 65 |.....C..|. ....Re|
|00005490| 63 6f 72 64 20 4e 75 6d | 62 65 72 3a 20 06 43 43 |cord Num|ber: .CC|
|000054a0| 43 4f 5a 9b 06 43 43 d9 | 09 00 6d 2e 6c 63 46 69 |COZ..CC.|..m.lcFi|
|000054b0| 65 6c 64 62 d9 01 00 4d | 0f f2 7d 00 43 f8 02 0d |eldb...M|..}.C...|
|000054c0| 20 43 f8 02 0d 20 06 d9 | 10 00 4f 72 69 67 69 6e | C... ..|..Origin|
|000054d0| 61 6c 20 56 61 6c 75 65 | 3a 20 06 43 00 f5 0d f7 |al Value|: .C....|
|000054e0| 04 00 f4 09 00 f6 0a 00 | 06 43 f8 02 0d 20 06 d9 |........|.C... ..|
|000054f0| 0f 00 43 75 72 72 65 6e | 74 20 56 61 6c 75 65 3a |..Curren|t Value:|
|00005500| 20 06 43 00 f5 0d f7 05 | 00 f4 09 00 f6 0a 00 06 | .C.....|........|
|00005510| 43 f8 02 0d 20 06 d9 0d | 00 59 6f 75 72 20 63 68 |C... ...|.Your ch|
|00005520| 61 6e 67 65 3a 20 06 43 | 43 f5 0d f7 03 00 ce f4 |ange: .C|C.......|
|00005530| 09 00 f6 0a 00 06 f3 26 | 00 43 f8 02 0d 20 43 f8 |.......&|.C... C.|
|00005540| 02 0d 20 06 f5 0d f7 03 | 00 06 d9 11 00 20 69 73 |.. .....|..... is|
|00005550| 20 61 20 4d 65 6d 6f 20 | 66 69 65 6c 64 2e 06 36 | a Memo |field..6|
|00005560| 06 43 f8 02 0d 20 06 43 | f8 02 0d 20 06 d9 3c 00 |.C... .C|... ..<.|
|00005570| 44 6f 20 79 6f 75 20 77 | 61 6e 74 20 74 6f 20 6f |Do you w|ant to o|
|00005580| 76 65 72 77 72 69 74 65 | 20 74 68 65 20 63 75 72 |verwrite| the cur|
|00005590| 72 65 6e 74 20 76 61 6c | 75 65 20 77 69 74 68 20 |rent val|ue with |
|000055a0| 79 6f 75 72 20 63 68 61 | 6e 67 65 3f 06 43 f8 02 |your cha|nge?.C..|
|000055b0| 0d 20 06 d9 30 00 28 43 | 68 6f 6f 73 65 20 27 43 |. ..0.(C|hoose 'C|
|000055c0| 61 6e 63 65 6c 27 20 74 | 6f 20 72 65 73 74 6f 72 |ancel' t|o restor|
|000055d0| 65 20 74 68 65 20 6f 72 | 69 67 69 6e 61 6c 20 76 |e the or|iginal v|
|000055e0| 61 6c 75 65 2e 29 06 f8 | 04 33 d9 0d 00 44 61 74 |alue.)..|.3...Dat|
|000055f0| 61 20 43 6f 6e 66 6c 69 | 63 74 ea 78 fd fe 04 00 |a Confli|ct.x....|
|00005600| 1e fe 13 00 0c fc f5 0d | f7 00 00 f8 01 01 10 fd |........|........|
|00005610| f9 05 97 05 fe 13 00 54 | f5 0d f7 06 00 10 fc 43 |.......T|.......C|
|00005620| f5 0d f7 03 00 ce fd fe | 24 00 25 fc f5 0d f7 04 |........|$.%.....|
|00005630| 00 f5 0d f7 06 00 0f f1 | 0c 00 f5 0d f7 05 00 f5 |........|........|
|00005640| 0d f7 06 00 0f 0b fd f9 | 05 93 05 fe 0d 00 54 f5 |........|......T.|
|00005650| 0d f7 07 00 10 fc 61 fd | fe b8 01 54 f5 0d f7 01 |......a.|...T....|
|00005660| 00 10 fc 43 d9 19 00 41 | 20 76 61 6c 75 65 20 68 |...C...A| value h|
|00005670| 61 73 20 62 65 65 6e 20 | 63 68 61 6e 67 65 64 2e |as been |changed.|
|00005680| 43 f8 02 0d 20 06 d9 07 | 00 46 69 65 6c 64 3a 20 |C... ...|.Field: |
|00005690| 06 f5 0d f7 03 00 06 43 | f8 02 0d 20 06 d9 0f 00 |.......C|... ....|
|000056a0| 52 65 63 6f 72 64 20 4e | 75 6d 62 65 72 3a 20 06 |Record N|umber: .|
|000056b0| 43 43 43 4f 5a 9b 06 43 | 43 d9 09 00 6d 2e 6c 63 |CCCOZ..C|C...m.lc|
|000056c0| 46 69 65 6c 64 62 d9 01 | 00 4d 0f f2 7d 00 43 f8 |Fieldb..|.M..}.C.|
|000056d0| 02 0d 20 43 f8 02 0d 20 | 06 d9 10 00 4f 72 69 67 |.. C... |....Orig|
|000056e0| 69 6e 61 6c 20 56 61 6c | 75 65 3a 20 06 43 00 f5 |inal Val|ue: .C..|
|000056f0| 0d f7 04 00 f4 09 00 f6 | 0a 00 06 43 f8 02 0d 20 |........|...C... |
|00005700| 06 d9 0f 00 43 75 72 72 | 65 6e 74 20 56 61 6c 75 |....Curr|ent Valu|
|00005710| 65 3a 20 06 43 00 f5 0d | f7 05 00 f4 09 00 f6 0a |e: .C...|........|
|00005720| 00 06 43 f8 02 0d 20 06 | d9 0d 00 59 6f 75 72 20 |..C... .|...Your |
|00005730| 63 68 61 6e 67 65 3a 20 | 06 43 43 f5 0d f7 03 00 |change: |.CC.....|
|00005740| ce f4 09 00 f6 0a 00 06 | f3 26 00 43 f8 02 0d 20 |........|.&.C... |
|00005750| 43 f8 02 0d 20 06 f5 0d | f7 03 00 06 d9 11 00 20 |C... ...|....... |
|00005760| 69 73 20 61 20 4d 65 6d | 6f 20 66 69 65 6c 64 2e |is a Mem|o field.|
|00005770| 06 36 06 43 f8 02 0d 20 | 06 43 f8 02 0d 20 06 d9 |.6.C... |.C... ..|
|00005780| 3c 00 44 6f 20 79 6f 75 | 20 77 61 6e 74 20 74 6f |<.Do you| want to|
|00005790| 20 6f 76 65 72 77 72 69 | 74 65 20 74 68 65 20 63 | overwri|te the c|
|000057a0| 75 72 72 65 6e 74 20 76 | 61 6c 75 65 20 77 69 74 |urrent v|alue wit|
|000057b0| 68 20 79 6f 75 72 20 63 | 68 61 6e 67 65 3f 06 43 |h your c|hange?.C|
|000057c0| f8 02 0d 20 06 d9 30 00 | 28 43 68 6f 6f 73 65 20 |... ..0.|(Choose |
|000057d0| 27 43 61 6e 63 65 6c 27 | 20 74 6f 20 72 65 73 74 |'Cancel'| to rest|
|000057e0| 6f 72 65 20 74 68 65 20 | 6f 72 69 67 69 6e 61 6c |ore the |original|
|000057f0| 20 76 61 6c 75 65 2e 29 | 06 f8 04 33 d9 0e 00 56 | value.)|...3...V|
|00005800| 65 72 69 66 79 20 43 68 | 61 6e 67 65 73 ea 78 fd |erify Ch|anges.x.|
|00005810| fe 04 00 1e fe 04 00 1c | fe 0d 00 18 48 f9 05 a8 |........|....H...|
|00005820| 05 f9 05 f6 05 fe 13 00 | 0c fc f5 0d f7 01 00 f8 |........|........|
|00005830| 01 07 10 fd f9 05 cf 05 | fe 14 00 3e fc f5 0d f7 |........|...>....|
|00005840| 03 00 03 fd d1 fc f5 0d | f7 05 00 fd fe 13 00 0c |........|........|
|00005850| fc f5 0d f7 01 00 f8 01 | 02 10 fd f9 05 f6 05 fe |........|........|
|00005860| 14 00 3e fc f5 0d f7 03 | 00 03 fd d1 fc f5 0d f7 |..>.....|........|
|00005870| 04 00 fd fe 04 00 1c fe | 04 00 85 fe 0f 00 25 fc |........|......%.|
|00005880| f5 0d f7 07 00 fd f9 05 | 37 06 fe 11 00 54 f5 0d |........|7....T..|
|00005890| f7 08 00 10 fc 43 2d 61 | ea 93 fd fe 19 00 42 fc |.....C-a|......B.|
|000058a0| 43 f5 0d f7 08 00 f2 06 | 00 f8 01 01 f3 03 00 f8 |C.......|........|
|000058b0| 01 02 36 fd fe 08 00 1b | f9 05 48 06 fe 09 00 42 |..6.....|..H....B|
|000058c0| fc f8 01 00 fd fe 04 00 | 1e fe 03 00 55 0b 00 07 |........|....U...|
|000058d0| 00 4c 4e 53 43 4f 50 45 | 08 00 4c 4e 43 48 4f 49 |.LNSCOPE|..LNCHOI|
|000058e0| 43 45 07 00 4c 4e 46 49 | 45 4c 44 07 00 4c 43 46 |CE..LNFI|ELD..LCF|
|000058f0| 49 45 4c 44 08 00 4c 55 | 4f 4c 44 56 41 4c 08 00 |IELD..LU|OLDVAL..|
|00005900| 4c 55 43 55 52 56 41 4c | 07 00 4c 55 46 49 45 4c |LUCURVAL|..LUFIEL|
|00005910| 44 0c 00 4c 4c 4d 41 44 | 45 43 48 41 4e 47 45 09 |D..LLMAD|ECHANGE.|
|00005920| 00 4c 4c 53 55 43 43 45 | 53 53 04 00 54 48 49 53 |.LLSUCCE|SS..THIS|
|00005930| 06 00 53 54 52 49 4e 47 | 20 01 07 00 af f7 00 00 |..STRING| .......|
|00005940| fe 1a 00 54 f5 0d f7 01 | 00 10 fc 43 fb 09 00 6d |...T....|...C...m|
|00005950| 2e 6c 75 56 61 6c 75 65 | 62 fd fe 0d 00 18 48 f9 |.luValue|b.....H.|
|00005960| 05 2e 00 f9 05 19 01 fe | 14 00 0c fc f5 0d f7 01 |........|........|
|00005970| 00 fb 01 00 43 10 fd f9 | 05 4f 00 fe 0d 00 42 fc |....C...|.O....B.|
|00005980| 43 f5 0d f7 00 00 9b fd | fe 19 00 0c fc 43 f5 0d |C.......|.....C..|
|00005990| f7 01 00 fb 01 00 4e fb | 01 00 59 ad fd f9 05 77 |......N.|..Y....w|
|000059a0| 00 fe 0f 00 42 fc 43 43 | f5 0d f7 00 00 5a 9b fd |....B.CC|.....Z..|
|000059b0| fe 14 00 0c fc f5 0d f7 | 01 00 fb 01 00 44 10 fd |........|.....D..|
|000059c0| f9 05 98 00 fe 0d 00 42 | fc 43 f5 0d f7 00 00 2a |.......B|.C.....*|
|000059d0| fd fe 14 00 0c fc f5 0d | f7 01 00 fb 01 00 54 10 |........|......T.|
|000059e0| fd f9 05 c1 00 fe 15 00 | 42 fc 43 fb 09 00 6d 2e |........|B.C...m.|
|000059f0| 6c 75 56 61 6c 75 65 ea | 81 fd fe 14 00 0c fc f5 |luValue.|........|
|00005a00| 0d f7 01 00 fb 01 00 4c | 10 fd f9 05 f4 00 fe 1f |.......L|........|
|00005a10| 00 42 fc 43 f5 0d f7 00 | 00 f2 09 00 fb 03 00 2e |.B.C....|........|
|00005a20| 54 2e f3 06 00 fb 03 00 | 2e 46 2e 36 fd fe 12 00 |T.......|.F.6....|
|00005a30| 0c fc f7 01 00 fb 01 00 | 4d 10 fd f9 05 19 01 fe |........|M.......|
|00005a40| 13 00 42 fc fb 0a 00 4d | 65 6d 6f 20 66 69 65 6c |..B....M|emo fiel|
|00005a50| 64 fd fe 04 00 1c fe 03 | 00 55 02 00 07 00 4c 55 |d.......|.U....LU|
|00005a60| 56 41 4c 55 45 05 00 55 | 54 59 50 45 8b 01 0f 00 |VALUE..U|TYPE....|
|00005a70| ae f7 00 00 07 f7 01 00 | 07 f7 02 00 fe 0d 00 54 |........|.......T|
|00005a80| f5 0d f7 01 00 10 fc 2d | fd fe 0f 00 54 f5 0d f7 |.......-|....T...|
|00005a90| 02 00 10 fc f8 01 00 fd | fe 0d 00 18 48 f9 05 38 |........|....H..8|
|00005aa0| 00 f9 05 d9 00 fe 21 00 | 0c fc 43 43 fb 09 00 42 |......!.|..CC...B|
|00005ab0| 75 66 66 65 72 69 6e 67 | ea 89 f8 01 02 f8 01 03 |uffering|........|
|00005ac0| ad fd f9 05 80 00 fe 16 | 00 25 fc fb 01 00 32 43 |........|.%....2C|
|00005ad0| f9 02 ff ff ea 90 01 fd | f9 05 7c 00 fe 0d 00 54 |........|..|....T|
|00005ae0| f5 0d f7 01 00 10 fc 61 | fd fe 04 00 1e fe 21 00 |.......a|......!.|
|00005af0| 0c fc 43 43 fb 09 00 42 | 75 66 66 65 72 69 6e 67 |..CC...B|uffering|
|00005b00| ea 89 f8 01 04 f8 01 05 | ad fd f9 05 c6 00 fe 14 |........|........|
|00005b10| 00 25 fc 43 f8 01 00 ea | 92 f8 01 00 11 fd f9 05 |.%.C....|........|
|00005b20| c2 00 fe 0d 00 54 f5 0d | f7 01 00 10 fc 61 fd fe |.....T..|.....a..|
|00005b30| 04 00 1e fe 08 00 32 f9 | 05 d9 00 fe 0b 00 52 2c |......2.|......R,|
|00005b40| 3a fc f7 03 00 fd fe 04 | 00 1c fe 0f 00 25 fc f5 |:.......|.....%..|
|00005b50| 0d f7 01 00 fd f9 05 79 | 01 fe 45 00 54 f5 0d f7 |.......y|..E.T...|
|00005b60| 00 00 10 fc 43 fb 21 00 | 44 6f 20 79 6f 75 20 77 |....C.!.|Do you w|
|00005b70| 61 6e 74 20 74 6f 20 73 | 61 76 65 20 79 6f 75 72 |ant to s|ave your|
|00005b80| 20 63 68 61 6e 67 65 73 | 3f f8 03 24 fb 0c 00 53 | changes|?..$...S|
|00005b90| 61 76 65 20 43 68 61 6e | 67 65 73 ea 78 fd fe 13 |ave Chan|ges.x...|
|00005ba0| 00 25 fc f5 0d f7 00 00 | f8 01 06 10 fd f9 05 63 |.%......|.......c|
|00005bb0| 01 fe 1f 00 54 f5 0d f7 | 02 00 10 fc 43 43 61 61 |....T...|....CCaa|
|00005bc0| ea 93 f2 06 00 f8 01 01 | f3 03 00 f8 01 02 36 fd |........|......6.|
|00005bd0| fe 08 00 1b f9 05 75 01 | fe 0a 00 86 fc 43 61 ea |......u.|.....Ca.|
|00005be0| 94 fd fe 04 00 1e fe 04 | 00 1e fe 0b 00 42 fc f5 |........|.....B..|
|00005bf0| 0d f7 02 00 fd fe 03 00 | 55 04 00 08 00 4c 4e 43 |........|U....LNC|
|00005c00| 48 4f 49 43 45 0c 00 4c | 4c 4d 41 44 45 43 48 41 |HOICE..L|LMADECHA|
|00005c10| 4e 47 45 09 00 4c 4e 53 | 55 43 43 45 53 53 0a 00 |NGE..LNS|UCCESS..|
|00005c20| 4e 4f 42 55 46 46 5f 4c | 4f 43 31 01 0b 00 ae f7 |NOBUFF_L|OC1.....|
|00005c30| 00 00 07 f7 01 00 fe 0f | 00 54 f5 0d f7 00 00 10 |........|.T......|
|00005c40| fc f8 01 00 fd fe 0d 00 | 18 48 f9 05 27 00 f9 05 |........|.H..'...|
|00005c50| 1f 01 fe 21 00 0c fc 43 | 43 fb 09 00 42 75 66 66 |...!...C|C...Buff|
|00005c60| 65 72 69 6e 67 ea 89 f8 | 01 02 f8 01 03 ad fd f9 |ering...|........|
|00005c70| 05 78 00 fe 16 00 25 fc | fb 01 00 32 43 f9 02 ff |.x....%.|...2C...|
|00005c80| ff ea 90 01 fd f9 05 74 | 00 fe 16 00 54 f5 0d f7 |.......t|....T...|
|00005c90| 00 00 10 fc 43 f8 01 01 | f4 02 00 f6 03 00 fd fe |....C...|........|
|00005ca0| 04 00 1e fe 21 00 0c fc | 43 43 fb 09 00 42 75 66 |....!...|CC...Buf|
|00005cb0| 66 65 72 69 6e 67 ea 89 | f8 01 04 f8 01 05 ad fd |fering..|........|
|00005cc0| f9 05 0c 01 fe 12 00 54 | f5 0d f7 01 00 10 fc 43 |.......T|.......C|
|00005cd0| f8 01 00 ea 92 fd fe 14 | 00 18 2b fc f5 0d f7 01 |........|..+.....|
|00005ce0| 00 f8 01 00 11 fd f9 05 | 08 01 fe 0b 00 23 fc f5 |........|.....#..|
|00005cf0| 0d f7 01 00 fd fe 2a 00 | 54 f5 0d f7 00 00 10 fc |......*.|T.......|
|00005d00| 43 f5 0d f7 00 00 f8 01 | 02 0f f2 0d 00 43 f8 01 |C.......|.....C..|
|00005d10| 01 f4 02 00 f6 03 00 f3 | 03 00 f8 01 02 36 fd fe |........|.....6..|
|00005d20| 14 00 54 f5 0d f7 01 00 | 10 fc 43 f5 0d f7 01 00 |..T.....|..C.....|
|00005d30| ea 92 fd fe 04 00 1d fe | 08 00 32 f9 05 1f 01 fe |........|..2.....|
|00005d40| 0b 00 52 2c 3a fc f7 04 | 00 fd fe 04 00 1c fe 0b |..R,:...|........|
|00005d50| 00 42 fc f5 0d f7 00 00 | fd fe 03 00 55 05 00 09 |.B......|....U...|
|00005d60| 00 4c 4e 53 55 43 43 45 | 53 53 05 00 4c 4e 52 45 |.LNSUCCE|SS..LNRE|
|00005d70| 43 04 00 54 48 49 53 0c | 00 48 41 4e 44 4c 45 52 |C..THIS.|.HANDLER|
|00005d80| 45 43 4f 52 44 0a 00 4e | 4f 42 55 46 46 5f 4c 4f |ECORD..N|OBUFF_LO|
|00005d90| 43 31 01 0b 00 ae f7 00 | 00 07 f7 01 00 fe 0f 00 |C1......|........|
|00005da0| 54 f5 0d f7 00 00 10 fc | f8 01 00 fd fe 0d 00 18 |T.......|........|
|00005db0| 48 f9 05 27 00 f9 05 1f | 01 fe 21 00 0c fc 43 43 |H..'....|..!...CC|
|00005dc0| fb 09 00 42 75 66 66 65 | 72 69 6e 67 ea 89 f8 01 |...Buffe|ring....|
|00005dd0| 02 f8 01 03 ad fd f9 05 | 78 00 fe 16 00 25 fc fb |........|x....%..|
|00005de0| 01 00 32 43 f9 02 ff ff | ea 90 01 fd f9 05 74 00 |..2C....|......t.|
|00005df0| fe 16 00 54 f5 0d f7 00 | 00 10 fc 43 f8 01 00 f4 |...T....|...C....|
|00005e00| 02 00 f6 03 00 fd fe 04 | 00 1e fe 21 00 0c fc 43 |........|...!...C|
|00005e10| 43 fb 09 00 42 75 66 66 | 65 72 69 6e 67 ea 89 f8 |C...Buff|ering...|
|00005e20| 01 04 f8 01 05 ad fd f9 | 05 0c 01 fe 12 00 54 f5 |........|......T.|
|00005e30| 0d f7 01 00 10 fc 43 f8 | 01 00 ea 92 fd fe 14 00 |......C.|........|
|00005e40| 18 2b fc f5 0d f7 01 00 | f8 01 00 11 fd f9 05 08 |.+......|........|
|00005e50| 01 fe 0b 00 23 fc f5 0d | f7 01 00 fd fe 2a 00 54 |....#...|.....*.T|
|00005e60| f5 0d f7 00 00 10 fc 43 | f5 0d f7 00 00 f8 01 02 |.......C|........|
|00005e70| 0f f2 0d 00 43 f8 01 00 | f4 02 00 f6 03 00 f3 03 |....C...|........|
|00005e80| 00 f8 01 02 36 fd fe 14 | 00 54 f5 0d f7 01 00 10 |....6...|.T......|
|00005e90| fc 43 f5 0d f7 01 00 ea | 92 fd fe 04 00 1d fe 08 |.C......|........|
|00005ea0| 00 32 f9 05 1f 01 fe 0b | 00 52 2c 3a fc f7 04 00 |.2......|.R,:....|
|00005eb0| fd fe 04 00 1c fe 0b 00 | 42 fc f5 0d f7 00 00 fd |........|B.......|
|00005ec0| fe 03 00 55 05 00 09 00 | 4c 4e 53 55 43 43 45 53 |...U....|LNSUCCES|
|00005ed0| 53 06 00 4c 4c 4e 52 45 | 43 04 00 54 48 49 53 0c |S..LLNRE|C..THIS.|
|00005ee0| 00 48 41 4e 44 4c 45 52 | 45 43 4f 52 44 0a 00 4e |.HANDLER|ECORD..N|
|00005ef0| 4f 42 55 46 46 5f 4c 4f | 43 0c 00 68 61 6e 64 6c |OBUFF_LO|C..handl|
|00005f00| 65 72 65 63 6f 72 64 2c | 00 00 00 00 00 ff ff 06 |erecord,|........|
|00005f10| 00 73 74 72 69 6e 67 e8 | 06 00 00 00 00 ff ff 0d |.string.|........|
|00005f20| 00 76 65 72 69 66 79 63 | 68 61 6e 67 65 73 1c 08 |.verifyc|hanges..|
|00005f30| 00 00 00 00 ff ff 10 00 | 76 65 72 69 66 79 65 61 |........|verifyea|
|00005f40| 63 68 63 68 61 6e 67 65 | da 09 00 00 00 00 ff ff |chchange|........|
|00005f50| 0e 00 63 68 65 63 6b 63 | 6f 6e 66 6c 69 63 74 73 |..checkc|onflicts|
|00005f60| 41 0b 00 00 00 00 ff ff | 31 00 7f 00 d7 01 f1 00 |A.......|1.......|
|00005f70| 41 00 81 01 e2 03 41 00 | f0 00 31 02 d1 00 d1 00 |A.....A.|..1.....|
|00005f80| e3 01 91 00 41 00 83 01 | f1 00 32 01 61 01 41 00 |....A...|..2.a.A.|
|00005f90| 41 00 41 01 41 01 d2 00 | 32 01 51 01 d1 00 56 1c |A.A.A...|2.Q...V.|
|00005fa0| 41 00 32 01 31 01 41 02 | d1 00 86 1b 41 00 41 00 |A.2.1.A.|....A.A.|
|00005fb0| d1 00 31 01 41 01 31 01 | 41 01 41 00 41 00 f1 00 |..1.A.1.|A.A.A...|
|00005fc0| 11 01 91 01 81 00 91 00 | 41 00 33 00 7a 00 a2 01 |........|A.3.z...|
|00005fd0| d1 00 41 01 d1 00 91 01 | f1 00 41 01 d1 00 41 01 |..A.....|..A...A.|
|00005fe0| 51 01 41 01 f1 01 21 01 | 31 01 41 00 32 00 20 01 |Q.A...!.|1.A.2. .|
|00005ff0| f1 00 d1 00 f1 00 d3 00 | 11 02 61 01 d1 00 41 00 |........|..a...A.|
|00006000| 11 02 41 01 d1 00 41 00 | 81 00 b1 00 41 00 f2 00 |..A...A.|....A...|
|00006010| 51 04 31 01 f1 01 81 00 | a1 00 41 00 41 00 b1 00 |Q.1.....|..A.A...|
|00006020| 32 00 be 00 f1 00 d2 00 | 11 02 61 01 61 01 41 00 |2.......|..a.a.A.|
|00006030| 11 02 21 01 41 01 b1 00 | a1 02 41 01 41 00 81 00 |..!.A...|..A.A...|
|00006040| b1 00 41 00 b1 00 32 00 | bd 00 f1 00 d2 00 11 02 |..A...2.|........|
|00006050| 61 01 61 01 41 00 11 02 | 21 01 41 01 b1 00 a1 02 |a.a.A...|!.A.....|
|00006060| 41 01 41 00 81 00 b1 00 | 41 00 b1 00 31 00 00 00 |A.A.....|A...1...|
|00006070| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 01 00 |........|........|
|00006080| 00 00 18 00 00 00 e0 0e | 00 00 01 00 00 00 32 00 |........|......2.|
|00006090| 00 00 fd 0e 00 00 57 12 | 00 00 69 00 00 00 43 00 |......W.|..i...C.|
|000060a0| 00 00 7b 12 00 00 4b 18 | 00 00 85 00 00 00 5d 00 |..{...K.|......].|
|000060b0| 00 00 72 18 00 00 25 1d | 00 00 b4 00 00 00 70 00 |..r...%.|......p.|
|000060c0| 00 00 4a 1d 00 00 c8 21 | 00 00 d6 00 00 00 00 29 |..J....!|.......)|
|000060d0| 00 00 00 a7 0e 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000060e0| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 02 e4 fe |........|........|
|000060f0| f2 ff 20 02 01 00 00 00 | cb 02 00 00 cb 02 00 00 |.. .....|........|
|00006100| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00006110| 00 00 00 00 00 00 28 89 | 02 00 00 00 25 00 00 00 |......(.|....%...|
|00006120| 2f 02 00 00 00 00 00 00 | 72 02 00 00 12 00 00 00 |/.......|r.......|
|00006130| 4e 02 00 00 00 00 00 00 | 00 00 00 00 fc 03 00 03 |N.......|........|
|00006140| 00 55 00 00 3e 00 15 00 | 54 f7 00 00 10 fc d9 01 |.U..>...|T.......|
|00006150| 00 63 f4 01 00 f7 02 00 | 06 fd fe 0f 00 25 fc 43 |.c......|.....%.C|
|00006160| f7 00 00 aa fd f9 05 37 | 00 fe 13 00 01 55 53 45 |.......7|.....USE|
|00006170| 20 49 4e 20 26 63 43 75 | 72 73 6f 72 0a 04 00 1e | IN &cCu|rsor....|
|00006180| fe 03 00 55 03 00 07 00 | 43 43 55 52 53 4f 52 04 |...U....|CCURSOR.|
|00006190| 00 54 48 49 53 04 00 4e | 41 4d 45 5c 01 13 00 25 |.THIS..N|AME\...%|
|000061a0| fc 43 f4 00 00 f7 01 00 | a1 0a fd f9 05 55 01 fe |.C......|.....U..|
|000061b0| 16 00 25 fc d9 01 00 2e | f4 00 00 f7 01 00 01 0a |..%.....|........|
|000061c0| fd f9 05 93 00 fe 6a 00 | 86 fc 43 d9 5e 00 54 68 |......j.|..C.^.Th|
|000061d0| 65 20 74 61 62 6c 65 20 | 61 6c 69 61 73 20 6d 75 |e table |alias mu|
|000061e0| 73 74 20 62 65 20 73 70 | 65 63 69 66 69 65 64 20 |st be sp|ecified |
|000061f0| 69 6e 20 74 68 65 20 63 | 6f 6e 74 72 6f 6c 53 6f |in the c|ontrolSo|
|00006200| 75 72 63 65 20 70 72 6f | 70 65 72 74 79 2c 20 69 |urce pro|perty, i|
|00006210| 6e 20 74 68 65 20 66 6f | 72 6d 61 74 20 27 61 6c |n the fo|rmat 'al|
|00006220| 69 61 73 2e 63 6f 6c 75 | 6d 6e 27 2e ea 78 fd fe |ias.colu|mn'..x..|
|00006230| 08 00 1b f9 05 51 01 fe | 24 00 54 f7 02 00 10 fc |.....Q..|$.T.....|
|00006240| 43 f4 00 00 f7 01 00 43 | d9 01 00 2e f4 00 00 f7 |C......C|........|
|00006250| 01 00 b8 f8 01 01 08 03 | ea b3 fd fe 2a 00 54 f7 |........|....*.T.|
|00006260| 03 00 10 fc 43 f4 00 00 | f7 01 00 43 f4 00 00 f7 |....C...|...C....|
|00006270| 01 00 ea b7 43 d9 01 00 | 2e f4 00 00 f7 01 00 b8 |....C...|........|
|00006280| 08 03 ea b4 fd fe 10 00 | 54 f4 00 00 f7 04 00 10 |........|T.......|
|00006290| fc f8 01 03 fd fe 48 00 | 54 f7 05 00 10 fc d9 10 |......H.|T.......|
|000062a0| 00 53 45 4c 45 43 54 20 | 44 49 53 54 49 4e 43 54 |.SELECT |DISTINCT|
|000062b0| 20 f7 03 00 06 d9 06 00 | 20 46 52 4f 4d 20 06 f7 | .......| FROM ..|
|000062c0| 02 00 06 d9 0e 00 20 49 | 4e 54 4f 20 43 55 52 53 |...... I|NTO CURS|
|000062d0| 4f 52 20 63 06 f4 00 00 | f7 06 00 06 fd fe 10 00 |OR c....|........|
|000062e0| 54 f4 00 00 f7 07 00 10 | fc f7 05 00 fd fe 04 00 |T.......|........|
|000062f0| 1e fe 04 00 1e fe 03 00 | 55 08 00 04 00 54 48 49 |........|U....THI|
|00006300| 53 0d 00 43 4f 4e 54 52 | 4f 4c 53 4f 55 52 43 45 |S..CONTR|OLSOURCE|
|00006310| 06 00 43 41 4c 49 41 53 | 07 00 43 43 4f 4c 55 4d |..CALIAS|..CCOLUM|
|00006320| 4e 0d 00 52 4f 57 53 4f | 55 52 43 45 54 59 50 45 |N..ROWSO|URCETYPE|
|00006330| 04 00 43 53 51 4c 04 00 | 4e 41 4d 45 09 00 52 4f |..CSQL..|NAME..RO|
|00006340| 57 53 4f 55 52 43 45 07 | 00 44 65 73 74 72 6f 79 |WSOURCE.|.Destroy|
|00006350| 2c 00 00 00 00 00 ff ff | 04 00 49 6e 69 74 83 00 |,.......|..Init..|
|00006360| 00 00 00 00 ff ff 31 00 | 51 01 f1 00 31 01 41 00 |......1.|Q...1.A.|
|00006370| 32 00 33 01 61 01 a1 06 | 81 00 41 02 a1 02 01 01 |2.3.a...|..A.....|
|00006380| 82 04 01 01 41 00 41 00 | 32 00 00 00 00 00 00 00 |....A.A.|2.......|
|00006390| 00 00 00 00 00 00 00 00 | 00 00 01 00 00 00 13 00 |........|........|
|000063a0| 00 00 5c 00 00 00 01 00 | 00 00 06 00 00 00 77 00 |..\.....|......w.|
|000063b0| 00 00 a8 02 00 00 07 00 | 00 00 00 29 00 00 00 cb |........|...)....|
|000063c0| 02 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000063d0| 00 00 00 00 00 00 01 00 | 00 00 6d 57 69 64 74 68 |........|..mWidth|
|000063e0| 20 3d 20 33 33 38 0d 0a | 48 65 69 67 68 74 20 3d | = 338..|Height =|
|000063f0| 20 33 32 0d 0a 50 69 63 | 74 75 72 65 20 3d 20 2e | 32..Pic|ture = .|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
